扫码下载APP
及时接收最新考试资讯及
备考信息
【问题】
EXCEL如何实现奇偶页打印?
【解答】
一是粘贴到WORD中打印;
二是用宏,编程代码如下:
Sub PrintOddEven()
tpg = ExecuteExcel4Macro("GET.DOCUMENT(50)")
For i = 1 To tpg Step 2
ActiveSheet.PrintOut i, i
Next
For i = 2 To tpg Step 2
ActiveSheet.PrintOut i, i
Next
End Sub
下一篇:VBA实例精解(一)
Copyright © 2000 - www.chinaacc.com All Rights Reserved. 北京正保会计科技有限公司 版权所有
京B2-20200959 京ICP备20012371号-7 出版物经营许可证 京公网安备 11010802044457号