Come si fa a verificare se una cartella di lavoro è già stata salvata?
Quando si apre una Nuovo workbook, potrebbe capitare di dimenticare di salvarla; sarebbe fastidioso chiudere accidentalmente la cartella di lavoro. Ma come si può verificare se una Cartella di lavoro Excel è già stata salvata?
Verificare se una cartella di lavoro è stata salvata o meno con codice VBA
Verificare se una cartella di lavoro è stata salvata o meno con codice VBA
Per verificare se una cartella di lavoro è già stata salvata, il seguente codice VBA ti sarà d’aiuto. Procedi nel modo seguente:
1. Tieni premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic for Applications.
2. Fai clic su Inserisci > Modulo, quindi incolla il codice seguente nella finestra del Modulo.
Codice VBA: Verifica se una cartella di lavoro è stata salvata o meno:
Sub filesaved()
'Updateby Extendoffice 20161109
Dim sLastTime As String
On Error GoTo EHandler
sLastTime = ActiveWorkbook.BuiltinDocumentProperties("last save time")
MsgBox sLastTime, vbInformation, "Kutools for Excel"
Exit Sub
EHandler:
MsgBox "File not saved", vbInformation, "Kutools for Excel"
End Sub
3. Premi quindi il tasto F5 per eseguire questo codice e vedrai apparire le seguenti finestre di avviso:
(1.) Se la cartella di lavoro è stata salvata, verrà visualizzata una finestra di avviso che ti ricorderà l’orario dell’ultimo salvataggio:
(2.) Se la cartella di lavoro non è stata salvata, vedrai la seguente finestra di avviso:
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi