Propriedade Document.BuiltInDocumentProperties (Word)
Retorna uma coleção DocumentProperties que representa todas as propriedades de documento internas para o documento especificado.
Sintaxe
expression. BuiltInDocumentProperties
expression é obrigatório. Uma variável que representa um objeto Document.
Comentários
Para retornar um único objeto DocumentProperty que representa uma propriedade de documento interna específica, use a propriedade BuiltinDocumentProperties. Se o Microsoft Word não definir um valor para uma das propriedades internas do documento, a leitura da propriedade Value para essa propriedade de documento gerará um erro.
Para obter informações sobre como retornar um único membro de uma coleção, consulte Retornando um objeto de uma coleção.
Use a propriedade CustomDocumentProperties para retornar a coleção das propriedades personalizadas de documento.
Exemplo
Este exemplo insere uma lista de propriedades internas no final do documento ativo.
Sub ListProperties()
Dim rngDoc As Range
Dim proDoc As DocumentProperty
Set rngDoc = ActiveDocument.Content
rngDoc.Collapse Direction:=wdCollapseEnd
For Each proDoc In ActiveDocument.BuiltInDocumentProperties
With rngDoc
.InsertParagraphAfter
.InsertAfter proDoc.Name & "= "
On Error Resume Next
.InsertAfter proDoc.Value
End With
Next
End Sub
Este exemplo exibe o número de palavras no documento ativo.
Sub DisplayTotalWords()
Dim intWords As Integer
intWords = ActiveDocument.BuiltInDocumentProperties(wdPropertyWords)
MsgBox "This document contains " & intWords & " words."
End Sub
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.