Objeto Documents (Word)
Uma coleção de todos os objetos Document que estão abertos atualmente no Word.
Use a propriedade Documents para retornar à coleção Documents. O exemplo a seguir exibe os nomes dos documentos abertos.
For Each aDoc In Documents
aName = aName & aDoc.Name & vbCr
Next aDoc
MsgBox aName
Use o método Add para criar um novo documento vazio e adicioná-lo à coleção Documentos . O exemplo a seguir cria um novo documento baseado no modelo Normal.
Documents.Add
Use o método Open para abrir um arquivo. O exemplo a seguir abre o documento chamado "Sales.doc".
Documents.Open FileName:="C:\My Documents\Sales.doc"
Use documentos (índice), onde índice é o nome do documento ou o número de índice para retornar um único objeto de documento. A instrução a seguir fecha o documento chamado "Report.doc" sem salvar alterações.
Documents("Report.doc").Close SaveChanges:=wdDoNotSaveChanges
O número de índice representa a posição do documento no conjunto de documentos. O exemplo a seguir ativa o primeiro documento no conjunto de documentos.
Documents(1).Activate
O exemplo a seguir enumera a coleção Documents para determinar se o documento chamado "Report.doc" está aberto. Se esse documento estiver contido na coleção Documents, será ativado; caso contrário, será aberto.
For Each doc In Documents
If doc.Name = "Report.doc" Then found = True
Next doc
If found <> True Then
Documents.Open FileName:="C:\Documents\Report.doc"
Else
Documents("Report.doc").Activate
End If
Referência do modelo de objeto do Word
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.