乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > excel电子表格里面怎么实现奇偶页打印?-excel2007奇数页打印,excel2010打印奇数页

excel电子表格里面怎么实现奇偶页打印?-excel2007奇数页打印,excel2010打印奇数页

作者:乔山办公网日期:

返回目录:excel表格制作


没找到选项啊。

1.单击菜单工具→宏→录制新宏

 

2.在弹出的录制新宏对话框中设定新的宏名``随便``自己知道是啥就行 将宏保存在个人宏工作簙中 

单击确定后,按停止录制宏按钮 。

3.同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码: Sub dayin() 。

Dim x, i As Integer 

x = ExecuteExcel4Macro("Get.Document(50)") MsgBox "现在打印奇数页", vbOKOnly 

For i = 1 To Int(x / 2) + 1 

ActiveSheet.PrintOut From:=2 * i - 1, To:=2 * i - 1 Next i 

MsgBox "现在打印偶数页", vbOKOnly For i = 1 To Int(x / 2) + 1 

ActiveWindow.SelectedSheets.PrintOut From:=2 * i, To:=2 * i Next i 

End Sub 

4.在此界面下直接按F5运行此宏,解决问题。


2003以上版本 可将文件转换为PDF格式

然后用PDF阅读器可以打印奇数偶数页




1、首先将Excel打开,如图所示。zd

2、然后点击左上角的【菜单】按钮,如图所示。

3、紧接着在里面点击【打印】,如图所示。

4、在打印内容窗口,点击【预览】,如图所示。

5、在打印预览中,点击【页面设置】,如图所示。

6、在打开的属性界面,点击【其它功能】,在里面打印顺序中,选择【打印奇数页】,也可以选择打印偶数页,excel就可以打印奇偶页了,如图所示,完成效果图。

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网