Continuing the thread705-1085150 dialog re: Mail merge 1

[steve728]

When using the following code:

Dim objWord As Word.DOCUMENT
Set objWord = GetObject("N:\Etna\ADOT.Doc", "Word.document")
'Make Word visible
objWord.Application.Visible = True
'Execute the mail merge
objWord.MailMerge.Execute

I still get the darn "Opening this document..." prompt.
What am I doing wrong or omitting.

Steve

 

[ssatech]

Have you tried:

Dim oApp As Object
Set oApp = CreateObject("Word.Application")
oApp.Documents.Open ("N:\Etna\ADOT.doc")
oApp.Visible = True
Set oApp = Nothing

 

[steve728]

It worked perfectly! You get a star!

Steve G.

 

[steve728]

I spoke too soon. The Word document comes up without a prompt alright but, the document has old data merged in. The underlying data in the table is not reflected in it.
Any way to refersh this data while using this code?

Steve