collection that represents the three list template galleries (Bulleted, Numbered, and Outline Numbered). Each gallery corresponds to a tab in the Bullets and Numbering dialog box (Format menu).
expression.ListGalleries
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
For information about returning a single member of a collection, see Returning an Object from a Collection.
Example
This example sets the variable mylsttmp
to the second list template on the Outline Numbered tab in the Bullets and Numbering dialog box. The example then applies that template to the first list in the active document.
Set mylsttmp = _
ListGalleries(wdOutlineNumberGallery).ListTemplates(2)
ActiveDocument.Lists(1).ApplyListTemplate ListTemplate:=mylsttmp
This example cycles through the ListGalleries collection and changes the templates in each list template gallery back to the built-in template.
For Each listgal In ListGalleries
For i = 1 To 7
listgal.Reset(i)
Next i
Next listgal