Fields Property

Returns a Fields object that represents all the fields in the specified text range.

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