So verwenden sie die filedatetime-funktion in vba (mit beispiel)

Sie können die FileDateTime- Funktion in VBA verwenden, um das Datum und die Uhrzeit zurückzugeben, zu der eine Datei erstellt oder zuletzt geändert wurde.

Hier ist eine gängige Methode, diese Funktion in der Praxis zu verwenden:

 SubCheckLastModify ()

    Dim wb_name As String
    
    wb_name = InputBox("Please enter the workbook name:")
    
    MsgBox FileDateTime(wb_name)
    
End Sub

Wenn dieses Makro ausgeführt wird, erscheint ein Eingabefeld, in das ein Benutzer den Namen einer Excel-Arbeitsmappe eingeben kann.

Das Makro erzeugt dann ein Meldungsfeld mit dem Datum und der Uhrzeit, zu der die jeweilige Arbeitsmappe erstellt oder zuletzt geändert wurde.

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Beispiel: So verwenden Sie die FileDateTime-Funktion in VBA

Nehmen wir an, wir haben eine Excel-Arbeitsmappe namens My_Workbook.xlsx , die sich an folgendem Speicherort befindet:

C:\Benutzer\bob\Dokumente\meine_Arbeitsmappe.xlsx

Nehmen wir an, wir möchten überprüfen, wann diese Arbeitsmappe zuletzt erstellt oder geändert wurde.

Dazu können wir das folgende Makro erstellen:

 SubCheckLastModify ()

    Dim wb_name As String
    
    wb_name = InputBox("Please enter the workbook name:")
    
    MsgBox FileDateTime(wb_name)
    
End Sub

Sobald wir dieses Makro ausführen, erscheint ein Feld, in das ich den Pfad zur Arbeitsmappe in das Eingabefeld eingeben kann:

Sobald ich auf OK klicke, erzeugt das Makro das folgende Meldungsfeld:

Das Makro teilt uns mit, dass die Arbeitsmappe zuletzt am 28.07.2023 um 9:27:01 Uhr geändert wurde.

Beachten Sie, dass Sie die FileDateTime- Funktion wie folgt mit der DateValue- Funktion umschließen können, wenn Sie nur das Datum benötigen, an dem die Datei geändert wurde:

 SubCheckLastModify ()

    Dim wb_name As String
    
    wb_name = InputBox("Please enter the workbook name:")
    
    MsgBox DateValue(FileDateTime(wb_name))
    
End Sub

Wenn Sie nun das Makro ausführen und den Dateipfad eingeben, wird im Meldungsfeld nur das Datum angezeigt, an dem das Feld zuletzt geändert wurde, ohne die Uhrzeit:

Hinweis : Die vollständige Dokumentation der FileDateTime- Funktion in VBA finden Sie hier .

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

VBA: So zählen Sie die Anzahl der Blätter in einer Arbeitsmappe
VBA: So speichern und schließen Sie eine Arbeitsmappe
VBA: Überprüfen Sie, ob die Arbeitsmappe geöffnet ist