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.