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

Метод List.CountNumberedItems (Word)

  • Статья

Возвращает количество маркированных или нумерованных элементов и полей LISTNUM в указанном объекте List .

Синтаксис

выражение. CountNumberedItems

Выражение Переменная, представляющая объект List.

Пример

В этом примере текущий выделенный фрагмент форматируется как список, используя второй шаблон нумерованного списка. Затем в примере подсчитываются нумерованные и маркированные элементы и поля LISTNUM в активном документе и отображается результат в окне сообщения.

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

В этом примере подсчитывается количество нумеруемых или маркированных элементов первого уровня в активном документе.

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

В этом примере подсчитывается количество полей LISTNUM в переменной myRange.

Результат отображается в окне сообщения.

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