Oharra
Orrialde honetara sartzeak baimena behar du. Saioa hasteko edo direktorioak aldatzen saia zaitezke.
Orrialde honetara sartzeak baimena behar du. Direktorioak aldatzen saia zaitezke.
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
Vea 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.