No sé si te servirá directamente la siguiente línea, o si tendrás que modificar algo...
Código:
TuObjetoWord.Selection.Sections(1).Footers(1).PageNumbers.Add PageNumberAlignment:= _
wdAlignPageNumberRight, FirstPage:=True Por supuesto, podrás cambiar si quieres poner el número en la cabecera en lugar de en el pie, así como a la izquierda o centrado en lugar de a la derecha como yo te pongo...