checking for an instance of Word

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Ted - 19 Mar 2005 19:53 GMT

Hi all,

I'm running some VBA code thru Access to open Word and print some documents.
How do I check to see if an instance of Word is already running?

Thanks in advance
Ted

Reply to this Message

Jezebel - 19 Mar 2005 22:33 GMT

Dim pWordApp as Word.Application (or as Object)

'Retrieve existing instance if any
on error resume next
Set pWordApp = GetObject("Word.Application")
On error goto 0

'Failing that, create a new instance
If pWordApp is nothing then
set pWordApp = CreateObject("Word.Application")
End if

> Hi all,
>
[quoted text clipped - 4 lines]
> Thanks in advance
> Ted

Reply to this Message