共用方式為

Word) (ListFormat.CountNumberedItems 方法

  • 發行項

將指定的 ListFormat 物件中傳回項目符號或編號項目及 LISTNUM 欄位的數目。

語法

expression。 CountNumberedItems

表達 代表 'ListFormat' 物件的變數。

範例

此範例會使用第二個編號清單範本，將目前選取範圍的格式設定成清單。 然後，此範例會計算使用中文件內的編號及項目符號項目數目以及 LISTNUM 欄位數目，並將結果顯示在訊息方塊中。

Selection.Range.ListFormat.ApplyListTemplate _ 
    ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(2) 
Msgbox ActiveDocument.CountNumberedItems

此範例會計算使用中文件內之第一層編號或項目符號項目的數目。

Msgbox ActiveDocument.Content.ListFormat _ 
    .CountNumberedItems(Level:=1)

此範例會計算 myRange 變數中的 LISTNUM 欄位數目。 結果會顯示在訊息方塊中。

Set myDoc = ActiveDocumentSet myRange = _ 
    myDoc.Range(Start:=myDoc.Paragraphs(12).Range.Start, _ 
    End:=myDoc.Paragraphs(50).Range.End) 
numfields = myRange.ListFormat.CountNumberedItems(wdNumberListNum) 
Msgbox numfields

另請參閱

ListFormat 物件

支援和意見反應

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