Método ListFormat.CountNumberedItems (Word)
Devuelve el número de elementos con viñetas o números y campos LISTNUM del objeto ListFormat especificado.
Sintaxis
expresión. CountNumberedItems
Expresión Variable que representa un objeto "ListFormat".
Ejemplo:
En este ejemplo se da formato a la selección actual como lista, utilizando la segunda plantilla de lista numerada. En el ejemplo, a continuación se cuentan los elementos numerados y con viñetas y los campos LISTNUM del documento activo y se presenta el resultado en un cuadro de mensaje.
Selection.Range.ListFormat.ApplyListTemplate _
ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(2)
Msgbox ActiveDocument.CountNumberedItems
En este ejemplo se cuenta el número de elementos de primer nivel numerados o con viñetas del documento activo.
Msgbox ActiveDocument.Content.ListFormat _
.CountNumberedItems(Level:=1)
En este ejemplo se cuenta el número de campos LISTNUM de la variable myRange. El resultado se muestra en un cuadro de mensaje.
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
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.
Comentarios
https://aka.ms/ContentUserFeedback.
Próximamente: A lo largo de 2024 iremos eliminando gradualmente GitHub Issues como mecanismo de comentarios sobre el contenido y lo sustituiremos por un nuevo sistema de comentarios. Para más información, vea:Enviar y ver comentarios de