Поделиться через


Объект 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 и обратная связь.