excel双面打印

excel双面打印

ID:37923464

大小:260.00 KB

页数:7页

时间:2019-06-02

excel双面打印_第1页
excel双面打印_第2页
excel双面打印_第3页
excel双面打印_第4页
excel双面打印_第5页
资源描述:

《excel双面打印》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、1.编辑Excel2003宏命令在Excel2003中第一次使用宏功能时,需要添加“个人宏工作簿”(即PERNOSAL.XLS),然后再使用VisualBasic编辑器编辑双面打印的宏命令。操作步骤如下所述:第1步,打开Excel2003,在Excel2003窗口中依次单击“工具”→“宏”→“录制新宏”菜单命令,打开“录制新宏”对话框。在“宏名”编辑框中输入任意名称,然后在“保存在”下拉菜单中选中“个人宏工作簿”选项,并单击“确定”按钮。  第2步,在打开的录制宏工具栏中单击“停止录制”按钮,Excel2003即可自动添加“个人宏工作

2、簿”。   第3步,在Excel2003窗口中依次单击“工具”→“宏”→“VisualBasic编辑器”菜单命令,打开VisualBasic编辑器窗口。右键单击左侧“工程”窗格中的“VBAProject(PERNOSAL.XLS)”选项,依次选择“插入”→“模块”菜单命令插入模块1。    第4步,双击“模块1”打开代码输入窗口,输入下面的代码:Subdy()OnErrorResumeNextx=ExecuteExcel4Macro("Get.Document(50)")Fori=1ToInt(x/2)+1ActiveWindow.S

3、electedSheets.PrintOutFrom:=2*i-1,To:=2*i-1NextiMsgBox"请将打印出的纸张反向装入纸槽中",vbOKOnly,"打印另一面"Forj=1ToInt(x/2)+1ActiveWindow.SelectedSheets.PrintOutFrom:=2*j,To:=2*jNextjEndSub输入完成后依次单击“文件”→“保存”菜单命令,并关闭VisualBasic编辑窗口返回Excel2003窗口。    2.在工具栏添加“双面打印”按钮第1步,在Excel2003窗口依次执行“工具”→

4、“自定义”菜单命令,打开“自定义”对话框。在“命令”选项卡中的“类别”列表中选中“宏”选项,然后将“命令”列表中的“自定义按钮”选项拖曳到工具栏上的合适位置。   第2步,选中刚刚添加的自定义按钮,在“自定义对话框”中单击“更改所选内容”按钮。在打开的快捷菜单中编辑“命名”编辑框,为自定义按钮输入名称(如“双面打印”),并选中“总是用文字”选项。  第3步,保持“自定义”对话框的打开状态,然后右键单击工具栏上刚添加的“双面打印”按钮,在打开的快捷菜单中单击“指定宏”命令。 第4步,打开“宏”对话框,选中事先编辑的宏,并单击“确定”按钮

5、,如图所示。  3.双面打印Excel2003表格打开需要双面打印的Excel2003文件,在工具栏中单击“双面打印”按钮。Excel2003会先将奇数页打印出来,然后打开“打开另一面”对话框,提示用户将纸张反向装入打印机的纸槽中。单击“确定”按钮即可将偶数页打印到另一面上,从而实现双面打印。

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。