以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Excel报表能单独打印奇数页或偶数页吗?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=17966)

--  作者:明丰
--  发布时间:2012/3/29 20:25:00
--  Excel报表能单独打印奇数页或偶数页吗?
如题,请问能设置吗?
--  作者:狐狸爸爸
--  发布时间:2012/3/29 21:41:00
--  
生成excel报表后,在excel打印,excel的打印功能可以这么做就行。
--  作者:明丰
--  发布时间:2012/3/29 22:23:00
--  

Excel页面设置没有该选项,重新设置较麻烦.如:

 

Sub PrintOddPage()
    Dim TotalPg As Integer, i As Integer
    TotalPg = ExecuteExcel4Macro("get.document(50)")
    For i = 1 To TotalPg Step 2
        ActiveSheet.PrintOut from:=i, To:=i
    Next i
    End Sub
打开excel,按alt+F11,在工程窗口里找到当前的project,然后右键插入一个新模块,将代码粘贴进去,然后在“工具-宏-宏”里面找到PrintOddPage,按执行就可以了

      打印偶数页只需将for循环改为i=2

 

有些用户要打印价格表,要求双面、多栏先直后横顺序打印。某软件用 Report Machine 很容易实现。虽然狐表有专业报表,但如果项目发布后交付用户使用,普通用户只能用Excel报表设计自己喜欢的打印格式。(如果用专业报表给每个客户设计报表,不累死才怪)

 

Excel报表如果能增加以下功能,就更完美了:

 

打印选择:打印奇数页、打印偶数页、打印当前页;多栏先直后横顺序打印


--  作者:狐狸爸爸
--  发布时间:2012/3/29 22:30:00
--  
抱歉,这个做不到的。
--  作者:程兴刚
--  发布时间:2012/3/30 0:14:00
--  
晕,excel打印的时候,在打印机属性的页面版式面板勾选双面打印即可,别什么都依赖狐表啊!
--  作者:明丰
--  发布时间:2012/3/30 7:14:00
--  
以下是引用程兴刚在2012-3-30 0:14:00的发言:
晕,excel打印的时候,在打印机属性的页面版式面板勾选双面打印即可,别什么都依赖狐表啊!

问题在于部分打印机不支持双面打印。总不可能要求用户更换打印机吧?也许考虑太多了。


--  作者:程兴刚
--  发布时间:2012/3/30 8:38:00
--  

除了平推式票据打印,其他的打印机应该都支持吧?您看了打印机属性了吗?