Propriedade Document.CustomDocumentProperties (Word)
Retorna uma coleção DocumentProperties que representa todas as propriedades de documento personalizadas do documento especificado.
Sintaxe
expressão. Customdocumentproperties
expressão Obrigatório. Uma variável que representa um objeto Document.
Comentários
Use a propriedade BuiltInDocumentProperties para retornar a coleção das propriedades internas do documento.
As propriedades do tipo msoPropertyTypeString (MsoDocProperties) não podem exceder 255 caracteres de comprimento.
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 insere uma lista de propriedades de documento personalizadas no final do documento ativo.
Set myRange = ActiveDocument.Content
myRange.Collapse Direction:=wdCollapseEnd
For Each prop In ActiveDocument.CustomDocumentProperties
With myRange
.InsertParagraphAfter
.InsertAfter prop.Name & "= "
.InsertAfter prop.Value
End With
Next
Este exemplo adiciona uma propriedade de documento personalizada a Sales.doc.
thename = InputBox("Please type your name", "Name")
Documents("Sales.doc").CustomDocumentProperties.Add _
Name:="YourName", LinkToContent:=False, Value:=thename, _
Type:=msoPropertyTypeString
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.