Application.ListGalleries Property (Word)
Returns a ListGalleries collection that represents the three list template galleries. .
Syntax
expression .ListGalleries
expression A variable that represents an Application object.
Remarks
Each template gallery (Bulleted, Numbered, and Outline Numbered) corresponds to a tab in the Bullets and Numbering dialog box (Format menu). 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