Объект Fields (издатель)
Коллекция объектов Field , представляющих все поля в текстовом диапазоне.
Замечания
Свойство Count для этой коллекции в публикации возвращает количество элементов в указанной фигуре или выделенном фрагменте.
Используйте свойство TextRange.Fields , чтобы вернуть коллекцию Fields . Используйте поля (индекс), где index — это номер индекса, чтобы вернуть один объект Field . Номер индекса представляет позицию поля в выделенном, диапазоне или публикации.
Пример
В следующем примере отображается код поля и результат первого поля в каждом текстовом поле активной публикации.
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
Методы
Свойства
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.