Gruppe
Extern
Problem
Wie kann ich Word mit einem im gleichen Verzeichnis wie die aufrufende Excel-Arbeitsmappe liegenden Dokument starten?
StandardModule: basMain
Sub WordOeffnen()
Dim sFile As String
sFile = Range("B1").Value
If Dir(sFile) <> "" Then
Shell "winword.exe """ & sFile & """", 1
Else
MsgBox "Datei nicht gefunden!"
End If
End Sub