Application.ListGalleries (Word)

Renvoie une collection ListGalleries qui représente les trois galeries de modèles de liste.

À chaque bibliothèque de modèles (Avec puces, Numéros et Hiérarchisation) correspond un onglet dans la boîte de dialogue Puces et numéros (menu Format).

Set mylsttmp = _ 
 ListGalleries(wdOutlineNumberGallery).ListTemplates(2) 
ActiveDocument.Lists(1).ApplyListTemplate ListTemplate:=mylsttmp