Mega Code Archive

 

Categories / VisualBasic Script / Word

 

Opening a New Window Containing an Open Document

Sub open()     Dim myWindow As Window     Set myWindow = Windows.Add(Window:=ActiveDocument.Windows(1)) End Sub