Visual Basic - abir documento en word condicionado

desaria saber como puede abir una hoja nueva en word siempre y cuando no exista otra abierta.

Bueno,el codigo siguiente abre el word,espero que te sirva.Primero debes activar la referencia Microsoft Word 9.o Object Library
A continuacion pon el siguiente codigo en el lugar que corresponda:

Dim hoja As Word.Application

Set hoja = CreateObject("Word.Application")
With hoja
.Visible = True
End With