次の方法で共有


Fields オブジェクト (Publisher)

テキスト範囲内のすべてのフィールドを表す Field オブジェクトのコレクションです。

注釈

文書内のこのコレクションの Count プロパティは、指定した図形または選択範囲の項目数を返します。

Fields コレクションを取得するには、TextRange.Fields プロパティを使用します。 1 つの Field オブジェクトを返すには、Fields (index) を使用します。index はインデックス番号です。 インデックス番号は、選択範囲、指定範囲、または文書内でのフィールドの位置を表します。

次の使用例は、作業中の文書の各テキスト ボックスで最初のフィールドのフィールド コードと実行結果を表示します。

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 のサポートおよびフィードバックを参照してください。