Worddokument durch ein Makro aufrufen

Bild

Betrifft: Worddokument durch ein Makro aufrufen
von: Linda
Geschrieben am: 23.02.2005 17:04:21
Hallo,
ich würde geren ein Worddokument über ein Excel Makro aufrufen.
kann mir jemand bitte weiterhelfen.
Gruß Linda

Bild

Betrifft: AW: Worddokument durch ein Makro aufrufen
von: UweD
Geschrieben am: 23.02.2005 17:10:10
Hallo Linda

ich mach es so:

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


Gruß UweD
Bild

Betrifft: AW: Worddokument durch ein Makro aufrufen
von: Linda
Geschrieben am: 23.02.2005 17:14:24
Danke!
Aber wo genau muss ich den Pfad eintragen?
Bild

Betrifft: AW: Worddokument durch ein Makro aufrufen
von: Linda
Geschrieben am: 23.02.2005 17:17:14
Danke, aber wo genau muss ich mein Pfad eingeben?
Bild

Betrifft: AW: Worddokument durch ein Makro aufrufen
von: UweD
Geschrieben am: 23.02.2005 17:18:04
Hi
tausch das aus:
Pfad = ActiveWorkbook.Path & "\Beispiel.doc"
würde den aktuellen Pfad verwenden
Pfad = "C:\Temp\Beispiel.doc"
explizite Angabe.

Gruß UweD
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Worddokument durch ein Makro aufrufen"