Prova a dare uno sguardo ai due link a fondo pagina

http://www.word.mvps.org/FAQs/MacrosVBA/NumberDocs.htm