Word Makros aus Excel aufrufen

Forumthread: Word Makros aus Excel aufrufen
1 Beitrag zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Word Makros aus Excel aufrufen

08.06.2005 17:34:58

Ulrich

Hallo,
ich möchte aus Excel heraus ein Word-Vba Makro aufrufen, das ich in einer Word-Datei gespeichert habe. Geht das auch irgendwie mit Application.run ...
Vielen Dank im voraus ......

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Word Makros aus Excel aufrufen

08.06.2005 17:40:02

Marc

AW: Word Makros aus Excel aufrufen

08.06.2005 17:40:02

Marc

Hallo,
versuch mal das.
Du muss unter Verweise Word aktivieren!!!!


Sub WordMakro()
Dim appWord As Object
Dim sFile As String
sFile = Range("B1").Value 'in B1 steht der Pfad und Worddokument
If Dir(sFile) = "" Then
Beep
MsgBox "Word-Dokument wurde nicht gefunden!"
Else
Set appWord = CreateObject("Word.Application")
appWord.Documents.Open sFile
appWord.Run "Project.Modul1."
appWord.Quit
Set appWord = Nothing
End If
End Sub

Gruß Marc