Dumm wie Sch.... und dann auch noch agressiv!
Betrifft: Probiere es mal so...
von: Case
Geschrieben am: 22.10.2020 14:50:58
Hallo Steffen, :-)
... der Spur nach (getestet): ;-)
Option Explicit
Public Sub Main()
With CreateObject("Scripting.FileSystemObject")
Debug.Print .GetAbsolutePathName(ThisWorkbook.Name)
End With
End Sub
Servus
Case
Betrifft: AW: Probiere es mal so...
von: Steffen Hamann
Geschrieben am: 22.10.2020 14:56:12
Klasse!!! Funktioniert!!
Vielen Dank!!!
|