Macro in Word ausführen
04.01.2013 11:09:17
Benedikt
Obwohl zu diesem Thema zig Beiträge existieren schaffe ich es auch am zweiten Tag nicht, dass nach dem Öffnen von Word per VBA aus Excel ein Macro in Word ausgeführt wird.
Das Wordmacro soll eine Userform öffnen und heisst MenuAnzeigen. Hinterlegt ist es in der Normal.dot von Word und ist unter Makro nach öffnen von Word sichtbar und kann von Wordseite ohne Probleme ausgeführt werden
Weder Application.Run toFile & "!MenuAnzeigen" noch AppWord.Run "Normal.Modul1.MenuAnzeigen" bringen das Macro zum laufen.
Vielen Dank für eure Hilfe Benedikt
Das öffnen von Word klappt soweit einwandfrei:
Sub Aufruf()
Dim dat As String
Dim p As Object
'Dokumenten-Pfad:
dat = "C:\"
On Error GoTo s 'Kontrolle ob Word schon gestartet ist
AppActivate "Microsoft Word"
GoTo n
s: 'Word starten
Application.ActivateMicrosoftApp (xlMicrosoftWord)
n:
Set p = CreateObject("Word.basic")
'Application.Run toFile & "!MenuAnzeigen"
'AppWord.Run "Normal.Modul1.MenuAnzeigen"
End Sub