Forum Discussion
Opening a Word document from an Excel spreadsheet
YES, YES, YES! That works, Thank you so much.
This procedure worked all except the Visible = true. I have screenprinted the Properties window and the sub as I changed it to my variable names and pasted them into a Word document and will attach it if I can figure out how. Comment: This procedure is not helpful to the user if they cannot see the document. (Few computer skills)
Hi aekbus​,
You are right - in practice Word can open in the background, so just setting Visible = True is not always enough.
This version handles that and works even if Word is already running:
Sub OpenWordDoc()
Dim wdApp As Object
On Error Resume Next
Set wdApp = GetObject(, "Word.Application")
On Error GoTo 0
If wdApp Is Nothing Then
Set wdApp = CreateObject("Word.Application")
End If
wdApp.Visible = True
wdApp.Documents.Open "C:\Path\To\Your\File.docx"
wdApp.Activate
End Sub
This forces Word to become visible and brings it to the front, so the user actually sees the document.