Word document openen vanuit macro in excel

[D-Mon]

Beste Helpmijers,

Ik wil graag een word-document openen vanuit een macro in excel.
Klinkt heel eenvoudig, maar ben al uren aan het zoeken op internet, in mijn
vba-bijbel en op dit forum maar ik kan geen praktisch voorbeeld vinden.

Heeft iemand voor mij een eenvoudige code?

Met vriendelijke groet,

Arno

 

[Superzeeuw]

Arno,

Nog geen minuut zoeken en ik heb een code die het zou moeten doen.
Op het werk heb ik een code die werkt maar die heb ik nu niet bij de hand.

Probeer de code maar eens, lukt het niet dan hoor ik het wel.
Code komt van Link

Sub OpenWordDoc()
'In order to use this code you must set a reference to the
'Word object library by doing this. In the VB Editor click
'Tools, References. Then search for Microsoft Word n.n Object Library
'where n.n will depend on your version of Word.

Dim wdApp As Word.Application, wdDoc As Word.Document

On Error Resume Next
Set wdApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then 'Word isn't already running
Set wdApp = CreateObject("Word.Application")
End If
On Error GoTo 0

Set wdDoc = wdApp.Documents.Open("C:\temp\anyolddoc.doc")

wdApp.Visible = True

'You can now do whatever you like with the Word document e.g.

wdDoc.PrintOut
wdDoc.SaveAs "C:\temp\hello.doc"
wdDoc.Activate
'etc

End Sub

 

[MDN111]

Zie ook deze post:

http://www.helpmij.nl/forum/showthread.php/578213-Macro-in-Excel-Open-nieuw-word-(dot)-en-update-fields?highlight=MDN111

Grtz,
MDN111