Question

I have a Microsoft Access form which will display a Microsoft Word app with a blank document when a particular button is clicked using the following code :

Set wrdApp = CreateObject("Word.Application")
wrdApp.Visible = True
Set wrdDoc = wrdApp.Documents.Add ' create a new document

All is fine except I can never get the Word window to appear on top of the Access window. It just appears in the task bar.

Basically, I want to use Microsoft Word as a pop-up rich text editor.

How can I position the newly opened Microsoft Word app on top of the Microsoft Access form which instantiated it?

Answer 1

After much trail and error, I’ve found the solution:

If Tasks.Exists("Microsoft Word") Then
   AppActivate "Microsoft Word"
End If