Utilizzare la proprietà Saved per determinare se una cartella di lavoro è stata modificata

Articolo
06/11/2024
Si applica a:

Microsoft Excel

Riepilogo

È possibile determinare se sono state apportate modifiche a una cartella di lavoro controllando la proprietà Saved della cartella di lavoro. La proprietà Saved restituisce un valore True o False a seconda che siano state apportate modifiche alla cartella di lavoro.

Nota

È possibile impostare la proprietà Saved su True o False. La sezione "Altre informazioni" di questo articolo contiene macro di esempio che illustrano l'utilizzo della proprietà Saved.

Varie condizioni nel foglio di lavoro, ad esempio la presenza di funzioni volatili, possono influire sulla proprietà Saved.

Ulteriori informazioni

Microsoft fornisce esempi di programmazione a scopo puramente illustrativo, senza alcuna garanzia di qualsiasi tipo, sia espressa che implicita, ivi incluse, a mero titolo esemplificativo, le garanzie implicite di commerciabilità o idoneità per uno scopo particolare. In questo articolo si presuppone che l'utente conosca il linguaggio di programmazione in questione e gli strumenti utilizzati per creare ed eseguire il debug delle procedure. I tecnici del supporto tecnico Microsoft possono spiegare le funzionalità di una particolare procedura, ma non modificheranno questi esempi per fornire funzionalità aggiuntive o procedure di costruzione per soddisfare i requisiti specifici.

Esempio 1: Macro per visualizzare un messaggio se la cartella di lavoro attiva contiene modifiche non salvate

Sub TestForUnsavedChanges()
    If ActiveWorkbook.Saved = False Then
        MsgBox "This workbook contains unsaved changes."
    End If
End Sub

Esempio 2: Macro per chiudere la cartella di lavoro e rimuovere le modifiche

Questa macro chiude la cartella di lavoro che contiene il codice di esempio e rimuove tutte le modifiche apportate alla cartella di lavoro impostando la proprietà Saved su True:

Sub CloseWithoutChanges()
    ThisWorkbook.Saved = True
    ThisWorkbook.Close
End Sub

Esempio 3: Un'altra macro per chiudere la cartella di lavoro e rimuovere le modifiche

Sub CloseWithoutChanges()
    ThisWorkbook.Close SaveChanges:=False
End Sub

Riferimenti

Per altre informazioni su come usare il codice di esempio in questo articolo, vedere Come eseguire codice di esempio dagli articoli della Knowledge Base in Office 2000.

Condividi tramite