wie kann ich eine Datei auf der Festplatte mit Excel kopieren ?
Gruss
Holger
Public Function getLnkPath(datei As String)
Dim Shell As Object
Dim link As Object
Set Shell = CreateObject("WScript.Shell")
Set link = Shell.CreateShortcut(datei)
getLnkPath = link.TargetPath
Set Shell = Nothing
Set link = Nothing
End Function
Gruss
Holger
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen