Propriedade Document.CustomDocumentProperties (Word)

Devolve uma coleção DocumentProperties que representa todas as propriedades personalizadas do documento para o 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 os 255 carateres de comprimento.

Para obter informações sobre como devolver um único membro de uma coleção, veja Devolver um objeto de uma coleção.

Exemplo

Este exemplo insere uma lista de propriedades personalizadas do documento 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.