Abfrage Speicherdatum
09.02.2021 16:33:25
Berny
ich stehe mal wieder mächtig auf dem Schlauch und bitte um Hilfe.
Ich möchte beim öffnen einer Datei abfragen, wann sie das letzte mal gespeichert wurde und wenn diese länger als einen Tag her ist einen Abgleich durchführen.
Dazu habe ich ein einfaches WorkbookOpen angelegt.
Private Sub Workbook_Open()
If Now - FileDateTime(ThisWorkbook.Name) > 1Then Abgleich
ThisWorkbook.Save
End Sub
M.f.G. Berny
Anzeige