Window.Type (Word)

Returns the window type. Possible return values are wdWindowDocument - A document window, wdWindowTemplate - A template window.

Dim wwtType As WdWindowType
wwtType = ActiveWindow.Type