Compartilhar via


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.