ListFormat.CountNumberedItems (Word)

Devuelve el número de elementos con viñetas o números y campos LISTNUM del objeto ListFormat especificado.

CountNumberedItems (NumberType, Level)

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

Arguments

Optional arguments

Los siguientes argumentos son opcionales

NumberType - WdNumberType

Posibles valores de retorno son wdNumberAllNumbers - Valor predeterminado en todos los demás casos, wdNumberListNum - Valor predeterminado de los campos LISTNUM, wdNumberParagraph - Números preestablecidos que se pueden agregar a los párrafos seleccionando una plantilla en el cuadro de diálogo Numeración y viñetas.

Level - Byte