Presentation.NewWindow (PowerPoint)

Abre uma nova janela que contém a apresentação especificada. Retorna um objeto DocumentWindow que representa a nova janela.

Set oldW = Application.ActiveWindow
Set newW = oldW.NewWindow
oldW.Activate