共用方式為


Word) (List.CountNumberedItems 方法

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

語法

expressionCountNumberedItems

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

範例

此範例會使用第二個編號清單範本,將目前選取範圍的格式設定成清單。 然後,此範例會計算使用中文件內的編號及項目符號項目數目以及 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

另請參閱

List 物件

支援和意見反應

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