The following macro (courtesy of Word MVP Jay Freedman) can be assigned to a
menu or toolbar button. If you don't know what to do with it, see http://www.gmayor.com/installing_macro.htm
Public Sub PrintCurrentPage()
With Dialogs(wdDialogFilePrint)
.Range = wdPrintCurrentPage
.PrintToFile = False
.Execute
End With
End Sub
