vba自动设置打印A3格式脚本

1、打开word，在word工具栏中，依次点击“视图”——“宏”——“录制宏”或直接点击word文档底部状态栏中的“录制宏”按钮。

2、弹出的“录制宏”窗口中，宏名修改为“SetupA3”，其它保持默认值即可，点击“确定”开始录制。录制只会对word文档的操作进行录制，其它动作不会记录，所以不用担心录制时间长的问题。

3、依次点击工具栏“页面布局”——“纸张大小”，然后选中纸张大小为“A3”。

4、再点击word文档底部状态栏中的“停止录制宏”按钮，停止宏的录制。

5、依次点击“视图”——“宏”——“查看宏”或直接按快捷键“Alt+F8”，打开宏列表窗口。

6、在宏列表窗口中，选择刚录制的宏：“SetupA3”，点击“编辑”按钮。

7、在弹出的编辑窗口，我们可以看到刚才的操作被录制了相对应的VBA代码。再仔细查看一下，是不是发现，我们需要的A3纸张打印的格式设置代码都在里面呀。

8、复制这段代码，重新打开一个新word文档，按快捷键“Alt+F11”,打开Visual Basic窗口，将刚复制的代码粘贴进去。

9、然后根据自己的需要进行参数修改，再按“F5”运行后，回到word主窗口，依次点击“布面布局”——“纸张大小”，可以看到纸燹唉侗墉张的打印参数已经改变。当然，你也可以只将这代码中需要部分复制到你自己编写的vba代码中，这里就不做详细介绍了。