Compartilhar via


Objeto Fields (Publisher)

Uma coleção de campo objetos que representam todos os campos em um intervalo de texto.

Comentários

A propriedade Count para essa coleção em uma publicação retorna o número de itens em uma forma ou seleção especificada.

Use a propriedade TextRange.Fields para retornar a coleção Fields . Use Campos (índice), em que o índice é o número do índice, para retornar um único objeto Field . O número de índice representa a posição do campo na seleção, intervalo ou publicação.

Exemplo

O exemplo a seguir exibe o código de campo e o resultado do primeiro campo em cada caixa de texto na publicação ativa.

Sub ShowFieldCodes() 
 Dim pagPage As Page 
 Dim shpShape As Shape 
 
 For Each pagPage In ActiveDocument.Pages 
 For Each shpShape In pagPage.Shapes 
 If shpShape.Type = pbTextFrame Then 
 With shpShape.TextFrame.TextRange 
 If .Fields.Count > 0 Then 
 MsgBox "Code = " & .Fields(1).Code & vbLf _ 
 & "Result = " & .Fields(1).Result & vbLf 
 End If 
 End With 
 End If 
 Next 
 Next 
End Sub

Métodos

Propriedades

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.