Word-Modul aus Excel ansprechen?
23.01.2007 11:41:05
Niels
ich habe eine Excel-Anwendung, aus der ich Word mit einer vordefinierten Datei starten und anschließend ein Makro ausführen will. Nur weiß ich nicht wie ich dieses Makro aus Excel aufrufe. Im Moment sieht die Excel-Funktion so aus:
Private Const Pfad = "C:\test.doc"
Sub Funktion ()
Dim wdAnw As Object
Dim wdDok As Object
Set wdDok = GetObject(Pfad)
Set wdAnw = wdDok.Parent
' weiterer Code
wdAnw.Visible = True
wdAnw.WindowState = 1
wdAnw.Activate
wdAnw.Modul2.Macro1
Set wdDok = Nothing
Set wdAnw = Nothing
End Sub
Die Funktion die ich in Word ausführen möchte heißt demnach "Makro1" und steht in Modul2. Wenn ich nun die Excel Funktion aufrufe wird zwar der Fokus auf Word gesetzt, das Makro aber nicht ausgeführt. Stattdessen meldet sich Excel mit "Laufzeitfehler 438: Objekt unterstützt diese Eigenschaft oder Methode nicht". Was muss ich ändern damit das Makro korrekt angesprochen wird?
MfG
Niels
Anzeige