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
Beim ersten mal funktioniert das. Nur wenn ich die Datei schließe und neu öffne bekomme ich die Meldung »Datei nicht gefunden.«M.f.G. Berny