ich würde geren ein Worddokument über ein Excel Makro aufrufen.
kann mir jemand bitte weiterhelfen.
Gruß Linda
Sub Word_open()
Dim WdApp As Object
Dim wdDok As Object
Pfad = ActiveWorkbook.Path & "\Beispiel.doc" 'anpassen
Set WdApp = CreateObject("Word.Application")
Set wdDok = WdApp.documents.Open(Filename:=Pfad, ReadOnly:=True)'anpassen
WdApp.Visible = True
WdApp.Activate
Set wdDok = Nothing
Set WdApp = Nothing
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen