ich versuche gerade per VBA eine x-beliebige zu öffnen.
Ich bin das Ganze so angegangen:
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As _
Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Declare Function GetDesktopWindow Lib "user32" () As Long
Private Sub btn_ETOproject_Click()
Pfad = Range("S10").Value
rc = ShellExecute(0, "open", Pfad, "", "", SW_HIDE)
End Sub
In Range S10 steht:C:\Tools\ETO Project.xlsm
irgendwie funktioniert es aber nicht.
Kann mir jemand helfen?
Freundliche Grüße
muehli