Objeto subdocument (Word)
Representa um subdocumento de um documento ou de um intervalo. O objeto Subdocument é um membro da coleção Subdocuments . A coleção Subdocuments inclui todos os subdocumentos de um intervalo ou de um documento.
Use subdocumentos (Index), onde Index é o número de índice, para retornar um único objeto Subdocument. O exemplo a seguir exibe o caminho e nome de arquivo do primeiro subdocumento do documento ativo.
If ActiveDocument.Subdocuments(1).HasFile = True Then
MsgBox ActiveDocument.Subdocuments(1).Path & _
Application.PathSeparator & _
ActiveDocument.Subdocuments(1).Name
End If
Use o método AddFromFile ou AddFromRange para adicionar um subdocumento a um documento. O exemplo a seguir adiciona um subdocumento chamado "Setup" ao final do documento ativo.
ActiveDocument.Subdocuments.Expanded = True
Selection.EndKey Unit:=wdStory
Selection.InsertParagraphBefore
ActiveDocument.Subdocuments.AddFromFile Name:="C:\Temp\Setup.doc"
O exemplo a seguir aplica o estilo Heading 1 ao primeiro parágrafo da seleção e, em seguida, cria um documento para o conteúdo da seleção.
Selection.Paragraphs(1).Style = wdStyleHeading1
With ActiveDocument.Subdocuments
.Expanded = True
.AddFromRange Range:=Selection.Range
End With
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.