Resets the list template specified by Index for the specified list gallery to the built-in list template format.
expression.Reset(Index)
expression Required. An expression that returns one of the above objects.
Index Required Long.
Font object: Removes manual character formatting (formatting not applied using a style). For example, if you manually format a word as bold and the underlying style is plain text (not bold), the Reset method removes the bold format.
Paragraph, Paragraphs, or ParagraphFormat object: Removes manual paragraph formatting (formatting not applied using a style). For example, if you manually right align a paragraph and the underlying style has a different alignment, the Reset method changes the alignment to match the formatting of the underlying style.
RoutingSlip object: Resets the routing slip so that a new routing can be initiated with the same recipient list and delivery information. The routing must be completed before you use this method.
InlineShape object: Removes changes that were made to an inline shape.
expression.Reset
expression Required. An expression that returns one of the above objects.
Example
As it applies to the Font object.
This example removes manual formatting from the selection.
Selection.Font.Reset
As it applies to the Paragraph object.
This example removes manual paragraph formatting from the second paragraph in the active document.
ActiveDocument.Paragraphs(2).Reset
As it applies to the RoutingSlip object.
This example prepares the active document to be rerouted to the same recipients as in the previous routing settings.
If ActiveDocument.HasRoutingSlip = True Then
ActiveDocument.RoutingSlip.Reset
End If
As it applies to the InlineShape object.
This example inserts a picture as an inline shape, changes the brightness, and then resets the picture to its original brightness.
Set aInLine = ActiveDocument.InlineShapes.AddPicture _
(FileName:="C:\Windows\Bubbles.bmp", Range:=Selection.Range)
aInLine.PictureFormat.Brightness = 0.5
MsgBox "Changing brightness back"
aInLine.Reset
As it applies to the ListGalleries object.
This example sets the fourth format listed on the Numbered tab in the Bullets and Numbering dialog box back to the built-in numbering format, and then it applies the list template to the selection.
ListGalleries(wdNumberGallery).Reset(4)
Selection.Range.ListFormat.ApplyListTemplate _
ListTemplate:=ListGalleries(2).ListTemplates(4)
This example resets all the list templates in the Bullets and Numbering dialog box back to the built-in formats.
For Each lg In ListGalleries
For i = 1 to 7
lg.Reset Index:=i
Next i
Next lg