Fields Property [Publisher 2003 VBA Language Reference]
Returns a Fields object that represents all the fields in the specified text range.
expression.Fields
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example bolds the first field in the first shape on the first page of the active publication.
Sub CountFields()
ActiveDocument.Pages(1).Shapes(1).TextFrame _
.TextRange.Fields(1).TextRange.Font.Bold = msoTrue
End Sub
Applies to | TextRange Object