Paragraph.SeparateList (Word)

Separates a list into two separate lists. For numbered lists, the new list restarts numbering at the starting number, usually 1.

ActiveDocument.Lists(1).ListParagraphs(1).SeparateList