Template.OpenAsDocument (Word)

Abre o modelo especificado como um documento e retorna um objeto Document .

Abrir um modelo como um documento permite ao usuário editar o conteúdo do modelo. Isso pode ser necessário se uma propriedade ou método (a propriedade estilos, por exemplo) não está disponível a partir do objeto Template.

Dim docNew As Document 
 
Set docNew = ActiveDocument.AttachedTemplate.OpenAsDocument 
 
If docNew.Content.Text <> Chr(13) Then 
 MsgBox "Template is not empty" 
Else 
 MsgBox "Template is empty" 
End If 
docNew.Close SaveChanges:=wdDoNotSaveChanges