Hi there
I'm trying to set up a simple menu button which restarts the numbering in a
list without destroying the current style.

I have a bit of code which restarts the number list (see below) but
unfortunately also applies a style at the same time. Whenever I try to remove
the parts which apply a template it stops working - anyone got any Ideas?

Sub ResetNumbering()
   Selection.Range.ListFormat.ApplyListTemplate
ListTemplate:=ListGalleries( _
       wdOutlineNumberGallery).ListTemplates(7),
ContinuePreviousList:=False, _
       ApplyTo:=wdListApplyToWholeList,
DefaultListBehavior:=wdWord9ListBehavior
End Sub