ListTemplate Property Example

This example checks to see which list template is used for the second paragraph in the active document, and then it applies that list template to the selection.

Set myltemp = ActiveDocument.Paragraphs(2).Range. _
    ListFormat.ListTemplate
Selection.Range.ListFormat.ApplyListTemplate ListTemplate:=myltemp