It would make more sense to ask this question in the Word VBA forum.

Searching the internet would reveal multiple examples of doing this. Here is one

__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia