VBA Datei öffnen
23.03.2004 18:33:34
klaus66
habe folgendes Problem.
Ich möchte von Word aus über ein Makro eine Excel-Datei öffnen. Das Klappt auch einwandfrei, vorausgesetzt im Pfad- oder Dateinamen ist kein Leerzeichen.
Wenn im Dateinamen oder im Pfad ein Leerzeichen ist bringt Excel immer die Fehlermeldung, das die Datei nicht gefunden werden kann.
Kann mir jemand sagen, wie man dieses Problem lösen kann.
Zum besseren Verständnis hier der Code:
Sub Open_Kalk_Sharan_Goal_U()
Dim ID As Double
Const Prog As String = "D:\Programme\Microsoft Office\Office\excel.exe G:\Auto Mergen 1\Neuwagenpreislisten\VW\Sharan\Kalk_Sharan\Sharan-Goal-U.xls"
ID = Shell(Prog, vbMaximizedFocus)
End Sub
Gruß
klaus66