Il faut faire une petit macro du genre :

Sub imprim_page_en_cours ()
Application.PrintOut Range:=wdPrintCurrentPage, Copies:=1
End Sub

et l'affecter à un bouton et mettre ce bouton dans la barre d'outils