ListFormat.CountNumberedItems (Word)

Retorna o número de itens com marcadores ou numerados e de campos LISTNUM no objeto ListFormat especificado.

CountNumberedItems (NumberType, Level)

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

Arguments

Optional arguments

Os seguintes argumentos são opcionais

NumberType - WdNumberType

Os valores de retorno possíveis são wdNumberAllNumbers - O valor padrão para todos os outros casos, wdNumberListNum - Valor padrão para campos LISTNUM, wdNumberParagraph - Predefine os números que você pode adicionar aos parágrafos selecionando um modelo na caixa de diálogo Marcadores e numeração.

Level - Byte