Opening Word MAXIMIZED, using an excel Macro.

[danno28]

I am opening a Word document from Excel, and would like it to open with Word maximised. This is my code so far:

Dim myWord As Object
Set myWord = CreateObject("Word.Application&quot
myWord.Visible = True
myWord.Documents.Open FileName:="C\IntTrainTemplate.doc", ReadOnly:=True
With myWord

..do stuff..

End With

 

[dsi]

Try early binding (note the declaration of myWord). This will enable you to get dropdown lists of methods and properties as you type.

    Dim myWord As Word.Application
    Set myWord = CreateObject("Word.Application")
    myWord.Visible = True
    myWord.Documents.Open FileName:="C\IntTrainTemplate.doc", ReadOnly:=True
    myWord.WindowState = wdWindowStateMaximize