閱讀英文

共用方式為


Publisher) (Field 物件

表示欄位。 Field 物件屬於 欄位 集合。 Fields 集合代表選取範圍、 範圍或出版物中的欄位。

註解

pbFieldPageNumber常數是常數PbFieldType群組的成員,其中包含所有不同的欄位類型。

使用 TextRange.Fields (索 ) ,其中 index 是索引編號,可傳回單一 Field 物件。 索引編號代表選取範圍、 範圍或出版物中欄位的位置。

範例

下列範例會計算使用中出版物的欄位數目,並在訊息中顯示計數。

Sub CountFields() 
 Dim pagPage As Page 
 Dim shpShape As Shape 
 Dim fldField As Field 
 Dim intFields As Integer 
 Dim intCount As Integer 
 
 For Each pagPage In ActiveDocument.Pages 
 For Each shpShape In pagPage.Shapes 
 If shpShape.Type = pbTextFrame Then 
 intCount = intCount + shpShape.TextFrame.TextRange.Fields.Count 
 End If 
 Next 
 Next 
 If intCount > 0 Then 
 MsgBox "You have " & intCount & " fields in your publication." 
 Else 
 MsgBox "You have no fields in your publication." 
 End If 
End Sub

方法

屬性

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應