excel双面打印.doc_第1页
excel双面打印.doc_第2页
excel双面打印.doc_第3页
excel双面打印.doc_第4页
excel双面打印.doc_第5页
已阅读5页，还剩2页未读， 继续免费阅读

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

1编辑Excel2003宏命令在Excel2003中第一次使用宏功能时，需要添加“个人宏工作簿”（即PERNOSAL.XLS），然后再使用Visual Basic编辑器编辑双面打印的宏命令。操作步骤如下所述：第1步，打开Excel2003，在Excel2003窗口中依次单击“工具”“宏”“录制新宏”菜单命令，打开“录制新宏”对话框。在“宏名”编辑框中输入任意名称，然后在“保存在”下拉菜单中选中“个人宏工作簿”选项，并单击“确定”按钮。第2步，在打开的录制宏工具栏中单击“停止录制”按钮，Excel2003即可自动添加“个人宏工作簿”。第3步， 在Excel2003窗口中依次单击“工具”“宏”“Visual Basic编辑器”菜单命令，打开Visual Basic编辑器窗口。右键单击左侧“工程”窗格中的“VBAProject(PERNOSAL.XLS)”选项，依次选择“插入”“模块”菜单命令插入模块1。第4步，双击“模块1”打开代码输入窗口，输入下面的代码：Sub dy()On Error Resume Nextx = ExecuteExcel4Macro(Get.Document(50)For i = 1 To Int(x / 2) + 1ActiveWindow.SelectedSheets.PrintOut From:=2 * i - 1, To:=2 * i - 1Next iMsgBox 请将打印出的纸张反向装入纸槽中, vbOKOnly, 打印另一面For j = 1 To Int(x / 2) + 1ActiveWindow.SelectedSheets.PrintOut From:=2 * j, To:=2 * jNext jEnd Sub输入完成后依次单击“文件”“保存”菜单命令，并关闭Visual Basic编辑窗口返回Excel2003窗口。2在工具栏添加“双面打印”按钮第1步，在Excel2003窗口依次执行“工具”“自定义”菜单命令，打开“自定义”对话框。在“命令”选项卡中的“类别”列表中选中“宏”选项，然后将“命令”列表中的“自定义按钮”选项拖曳到工具栏上的合适位置。第2步，选中刚刚添加的自定义按钮，在“自定义对话框”中单击“更改所选内容”按钮。在打开的快捷菜单中编辑“命名”编辑框，为自定义按钮输入名称（如“双面打印”），并选中“总是用文字”选项。第3步，保持“自定义”对话框的打开状态，然后右键单击工具栏上刚添加的“双面打印”按钮，在打开的快捷菜单中单击“指定宏”命令。第4步，打开“宏”对话框，选中事先编辑的宏，并单击“确定”按钮，如图所示。3双面打印Excel2003表格打开需要双面打印的Excel2003文件，在工具栏中单击“双面打印”按钮。Excel2003会先将奇数页打印出来，然后打
人人文库> 全部分类> 教育资料 > 课件下载

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论