excel 如何设置双面打印 篇一:Excel 双面打印设置方法 Excel 双面打印 2024/02/21 12:03 编辑宏 第一步:启动 Excel 2024(其他版本请仿照操作),执行“工具→宏→Visual Basic 编辑器”命令,进入 Visual Basic 编辑状态
Visual Basic 编辑状态 第二步:在右侧的“工程资源管理器”区域中,选中 “VBAProject(PERNOSAL
XLS)”选项,执行“插入→模块”命令,插入一个新模块(模块1)
小提示 “PERNOSAL
XLS”叫做“个人宏工作簿”,第一次使用宏功能时,需要进入下述操作,添加“个人宏工作簿”:在 Excel 中,执行“工具→宏→ 录制新宏”命令,打开“录制新宏”对话框,输入一个名称,然后选择将其“保存在”“个人宏工作簿”中,确定返回,随便做一下编辑操作,然后按“停止录制” 工具栏上的“停止录制”按钮,系统即可自动添加“个人宏工作簿”
“录制新宏”对话框 第三步:双击“模块 1”进入代码输入区域,将下述代码输入其中: Sub dy() On Error Resume Next x = ExecuteExcel4Macro(Get
Document(50)) For i = 1 To Int(x / 2) + 1 ActiveWindow
SelectedSheets
PrintOut From:=2 * i - 1, To:=2 * i - 1 Next i MsgBox 请将打印出的纸张反向装入纸槽中, vbOKOnly, 打印另一面 For j = 1 To Int(x / 2) + 1 ActiveWindow
SelectedSheets
PrintOut From:=2 * j, To:=2 * j Next j End Sub 第四步:输入完成后,关闭 Visu