Änderungsdatum externer Datei in Zelle anzeigen
Hi,
bisher hat die Datei, deren Änderungsdatum ich anzeigen lies, auf einem Netzlaufwerk gelegen und das nachfolgende VBA auch super funktioniert.
Jetzt liegt die Datei im Onedrive und der Pfad ist nun eine URL.
Mit welcher Syntax übergebe ich nun die URL an meine Function? Ich bekomme es einfach nicht hin.
Ich habe es u.a. so versucht.
Danke dev5fr
Das verwendete VBA sieht so aus.
bisher hat die Datei, deren Änderungsdatum ich anzeigen lies, auf einem Netzlaufwerk gelegen und das nachfolgende VBA auch super funktioniert.
Code:
=AenderungsDatum("U:\Report\data.xlsx")+JETZT()*0Jetzt liegt die Datei im Onedrive und der Pfad ist nun eine URL.
Mit welcher Syntax übergebe ich nun die URL an meine Function? Ich bekomme es einfach nicht hin.
Ich habe es u.a. so versucht.
Code:
=AenderungsDatum("[https://m-my.sharepoint.com/Report/data.xlsx]")+JETZT()*0Danke dev5fr
Das verwendete VBA sieht so aus.
Code:
Function AenderungsDatum(strDatei As String) As Date
Dim FS As Object
Set FS = CreateObject("Scripting.FileSystemObject")
AenderungsDatum = FS.GetFile(strDatei).dateLastModified
Set FS = Nothing
End Function