This is what was on the MVP FAQ site a while back when I saved it.
It's mostly a summary of links.
==================================================
How to cure Word's List Numbering with a dose of VBA
Article contributed by Dave Rado
The following links to newsgroup archives on the subject should help
you. Having read the following articles, if you get stuck or have any
further queries, please post specific details in the numbering
newsgroup.
Before using VBA, you need to understand how to link your styles to
numbering schemes manually. For some examples of how to do this, see
the following newsgroup archives threads:
Resetting numbering not available
Restart Chapter Numbers
Heading number 1 2 ... n then "Appendix A", ...
The second indented bullet, how to customize?
How to change the value for default indent for numbering?
You can find more examples by searching the Google Advanced Groups
Search page.
If you are defining body text numbering styles (as opposed to heading
styles), note that Word's “Restart numbering” feature is seriously
buggy. Margaret Aldis worked out an excellent workaround which is
covered in the newsgroup archive thread: MailMerge & Automatic
Numbering (among many other places). There's also more in-depth
coverage of this in the thread: ListNumbering Street, Revisited.
Once you've got the hang of defining your styles manually, see the
following threads to find out how to define rock-solid numbering
styles using VBA, linking your styles to named list templates:
Nightmare on ListNumbering Street
The Joy of Lists
Relinking ListTemplates
Outline numbering: restart doesn't restart
Format Doesn't "Hold"
Note that the trick (covered in the above articles) is to define your
styles using VBA and then apply your styles to your text as required.
A common mistake is to apply list templates directly to text using
VBA. Don't ever do that.
Again, you can find more examples by searching the Google Advanced
Groups Search page.
See also Word's numbering explained.