Méthode List.CountNumberedItems (Word)
Renvoie le nombre d'éléments à puces ou numérotés et de champs LISTNUM dans l'objet List spécifié.
Syntaxe
expression. CountNumberedItems
Expression Variable qui représente un objet « List ».
Exemple
Cet exemple montre comment présenter la sélection sous forme de liste à l'aide du deuxième modèle de liste numérotée. Il montre ensuite comment compter les éléments numérotés et à puces ainsi que les champs LISTNUM contenus dans le document actif, puis comment afficher le résultat dans une boîte de message.
Selection.Range.ListFormat.ApplyListTemplate _
ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(2)
Msgbox ActiveDocument.CountNumberedItems
Cet exemple montre comment compter les éléments à puces ou numérotés de premier niveau contenus dans le document actif.
Msgbox ActiveDocument.Content.ListFormat _
.CountNumberedItems(Level:=1)
Cet exemple montre comment compter le nombre de champs LISTNUM dans la variable myRange.
Le résultat est affiché dans une boîte de message.
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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour