Hi SaneMan,
Instead of using 'ActiveWindow.WindowState = wdWindowStateMinimize' I'd suggest coding the 'UserForm_Initialize' sub as:
Code:
Private Sub UserForm_Initialize()
Set DocFrm = ThisDocument
DocFrm.ActiveWindow.Visible = False
End Sub
This will keep the document hidden during use unless you change its 'Visible' property.