word实现打印当前页的“宏”代码

word的工具栏里没有提供给“打印当前页”的命令，只能从“文件”菜单中选择“打印”，再选“当前页”，比较不方便。但是我们可以通过“宏”，自己设计这么一个功能。

　　宏代码如下，两段代码都可以实现“打印当前页”。前一种，弹出“打印”对话框，自动选择了“打印当前页”，最后需要自己点击“确定”键。后一种，不会弹出对话框，而是直接打印了。

　　可以将这个功能手动放到工具栏上，随时使用。

Sub 打印当前页() With Dialogs(wdDialogFilePrint)
.Range = wdPrintCurrentPage
.Show
End With End Sub
Sub 打印当前页() Application.PrintOut FileName:="", Range:=wdPrintCurrentPage End Sub 当然，还有一种不需要编写代码的方法，就是操作一遍“打印当前页”的过程，录制成宏。