Hallo Leute,
ich brauche Hilfe beim Auslesen eines Änderungsdatums per VBA in Excel.
Das ist mein Code zum Auslesen des Änderungsdatums:
Sub AenderungsDatumAnja()
Dim FD As Object
Dim F As Object
Dim D As Date
Set FD = CreateObject("Scripting.FileSystemObject")
Set F = FD.GetFile("L:\Anja.xlsx")
D = F.dateLastModified
Sheets("Refresh").Range("D9").Value = D
Set FD = Nothing
Set F = Nothing
Call AenderungsDatumBenji
End Sub
Das klappt alles auch soweit super. Das Problem ist jedoch, dass ich diese Abfrage mit einer MS Query ausführe, die die Daten aus Anja.xlsx abruft.
Mit jedem Abruf der Daten wird leider das Änderungsdatum aktualisiert.
Ich muss jedoch wissen, welchen Stand die abgerufenen Daten haben.
Kann mir einer Helfen?
Viele Grüße
Lenn