Objeto field (Publisher)
Representa um campo. O objeto Field é um membro dos campos coleção. A coleção Fields representa os campos em uma seleção, intervalo ou publicação.
A constante pbFieldPageNumber é membro do grupo de constantes PbFieldType , que inclui todos os vários tipos de campo.
Use TextRange.Fields (index), 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.
O exemplo a seguir conta o número de campos na publicação ativa e exibe a contagem em uma mensagem.
Sub CountFields()
Dim pagPage As Page
Dim shpShape As Shape
Dim fldField As Field
Dim intFields As Integer
Dim intCount As Integer
For Each pagPage In ActiveDocument.Pages
For Each shpShape In pagPage.Shapes
If shpShape.Type = pbTextFrame Then
intCount = intCount + shpShape.TextFrame.TextRange.Fields.Count
End If
Next
Next
If intCount > 0 Then
MsgBox "You have " & intCount & " fields in your publication."
Else
MsgBox "You have no fields in your publication."
End If
End Sub
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.