Propriété Document.Lists (Word)
Renvoie une collection Lists qui contient toutes les listes de mise en forme du document spécifié. En lecture seule.
Syntaxe
expression. Lists
Expression Variable qui représente un objet Document .
Remarques
Pour plus d’informations sur le renvoi d’un seul membre d’une collection, consultez Renvoi d’un objet à partir d’une collection.
Exemple
Cet exemple montre comment mettre en forme la sélection sous la forme d’une liste numérotée. L’exemple affiche ensuite une boîte de message qui indique le nombre de listes dans le document actif.
Selection.Range.ListFormat.ApplyListTemplate _
ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(2)
MsgBox "This document has " & ActiveDocument.Lists.Count _
& " lists."
Cet exemple montre comment appliquer à la troisième liste du document actif la mise en forme de liste à puces par défaut. Si la liste contient déjà des puces, cette mise en forme est supprimée.
If ActiveDocument.Lists.Count >= 3 Then
ActiveDocument.Lists(3).Range.ListFormat.ApplyBulletDefault
End If
Cet exemple montre comment afficher une boîte de message indiquant le nombre d'éléments contenus dans chacune des listes du fichier MyLetter.doc.
Set myDoc = Documents("MyLetter.doc")
i = myDoc.Lists.Count
For each li in myDoc.Lists
Msgbox "List " & i & " has " & li.CountNumberedItems _
& " items."
i = i - 1
Next li
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.