Excel双面打印功能-宏命令.doc

《Excel双面打印功能-宏命令.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、Excel双面打印功能----宏命令编辑宏 第一次使用宏功能时，需要进入下述操作，添加“个人宏工作簿”:在Excel中，执行“工具→宏→录制新宏”命令，打开“录制新宏”对话框，输入一个名称，然后选择将其“保存在”“个人宏工作簿”中，确定返回，随便做一下编辑操作，然后按“停止录制”工具栏上的“停止录制”按钮，系统即可自动添加“个人宏工作簿”。 第一步：启动Excel2003(其他版本请仿照操作)，执行“工具→宏→VisualBasic编辑器”命令，进入VisualBasic编辑状态。 第二步：在右侧的“工程资源管理器”区域中，选中“VBAProject(PERNOS

2、AL.XLS)”选项，执行“插入→模块”命令，插入一个新模块(模块1)。　　第三步：双击“模块1”进入代码输入区域，将下述代码输入其中：SubMacro1()OnErrorResumeNextx=ExecuteExcel4Macro("Get.Document(50)")Fori=1ToInt(x/2)+1ActiveWindow.SelectedSheets.PrintOutFrom:=2*i-1,to:=2*i-1NextiMsgBox"请将打印出的纸张反向装入纸槽中",vbOKOnly,"打印另一面"For j=1ToInt(x/2)+1(顺序打印2,4,6

3、.....)Forj=Int(x/2)+1To1Step-1(逆序打印...6,4,2)根据打印机情况以上2选1ActiveWindow.SelectedSheets.PrintOutFrom:=2*j,to:=2*jNextjEndSub  输入完成后，关闭VisualBasic编辑窗口返回。需要打印时直接运行宏命令.或者添加按钮到工具栏.