ListGalleries Property

Returns a ListGalleries 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   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