excel电子表格里面怎么实现奇偶页打印？
我哭死了啊！？虚心求救，但是excel里面没有哎，谁有什么方法能实现奇偶页打印word里面点击打印里面有单打奇数页和偶数页的，现有近千张文件需要打印！
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运行此宏，解决问题。
