Clever-Excel-Forum

Normale Version: Änderungsdatum externer Datei in Zelle anzeigen
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hi,

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()*0


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.

Code:
=AenderungsDatum("[https://m-my.sharepoint.com/Report/data.xlsx]")+JETZT()*0


Danke 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