Please see also my Private Message.Poppadon56 wrote:If you happen to find those macros to restart numbering I would appreciate it.
In the meantime http://word.mvps.org/faqs/numbering/listrestartfromvba.htm
Please see also my Private Message.Poppadon56 wrote:If you happen to find those macros to restart numbering I would appreciate it.
Then I found my cover functions:- (But I haven't retested them today, yet)Poppadon56 wrote:If you happen to find those macros to restart numbering I would appreciate it.
Code: Select all
Public Sub Step()
Call SetStyle(Selection.Range, "Step")
End Sub
Public Sub Number()
Call SetStyle(Selection.Range, "Number")
End Sub
Public Sub Restart()
Select Case Selection.Paragraphs(1).Style.NameLocal
Case "Number"
Call RestartListNumbering(Selection.Paragraphs(1).Range)
Case "Step"
Call RestartListNumbering(Selection.Paragraphs(1).Range)
Case Else
End Select
End Sub
Public Sub JoinList()
Call UnRestartListNumbering
End Sub