Wie überprüfe ich, ob eine Arbeitsmappe gespeichert ist?

Wenn Sie eine neue Arbeitsmappe öffnen, vergessen Sie möglicherweise, sie zu speichern. Es ist ärgerlich, wenn Sie die Arbeitsmappe versehentlich schließen. Wie können Sie jedoch überprüfen, ob eine Excel-Arbeitsmappe gespeichert wurde?

Überprüfen Sie, ob eine Arbeitsmappe mit VBA-Code gespeichert ist oder nicht

---

Überprüfen Sie, ob eine Arbeitsmappe mit VBA-Code gespeichert ist oder nicht

Wenn Sie überprüfen, ob eine Arbeitsmappe gespeichert ist oder nicht, kann Ihnen der folgende VBA-Code einen Gefallen tun. Gehen Sie wie folgt vor:

1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.

VBA-Code: Überprüfen Sie, ob eine Arbeitsmappe gespeichert ist oder nicht:

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. Dann drücken F5 Wenn Sie diesen Code ausführen, erhalten Sie die folgenden Eingabeaufforderungsfelder:

(1.) Wenn die Arbeitsmappe gespeichert wurde, wird ein Eingabeaufforderungsfeld angezeigt, das Sie an die zuletzt gespeicherte Zeit Ihrer Arbeitsmappe erinnert:

(2.) Wenn die Arbeitsmappe nicht gespeichert wurde, wird die folgende Eingabeaufforderung angezeigt: