Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna uma coleção Subdocuments que representa todos os subdocumentos no documento especificado. Somente leitura.
Sintaxe
expression. Subdocuments
Expressão Uma variável que representa um objeto Document .
Comentários
Para obter informações sobre como retornar um único membro de uma coleção, consulte Retornando um objeto de uma coleção.
Exemplo
Este exemplo exibe o número de subdocumentos incorporados no documento ativo.
MsgBox ActiveDocument.Subdocuments.Count
Este exemplo exibe o caminho e o nome de arquivo de cada subdocumento do documento ativo.
For Each subdoc In ActiveDocument.Subdocuments
If subdoc.HasFile = True Then
MsgBox subdoc.Path & Application.PathSeparator _
& subdoc.Name
Else
MsgBox "This subdocument has not been saved."
End If
Next subdoc
Confira também
Suporte e comentários
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.