以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教如何打印关联表的部份列  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=62207)

--  作者:szoriental
--  发布时间:2014/12/27 14:44:00
--  请教如何打印关联表的部份列

在窗口加按钮“打印”,代码:

 

With Tables("SALES.Saleslist").PrintInfo
    .Title = "订单交货明细"
    .PageFooter = "第[PageNo]页,共[PageCount]页"
    .PageFooterLine = True
    .PaperKind = 9
    .FitIntoPage = True
End With
Tables("SALES.Saleslist").Print(True,False)

 

这样效果是把整个表打印了,我想选定其中某几列打印,要怎么加代码?


--  作者:Bin
--  发布时间:2014/12/27 14:55:00
--  
把不想打印的列,隐藏掉
--  作者:szoriental
--  发布时间:2014/12/27 15:04:00
--  

谢谢BIN,但如果用VISIBLE把不要的列隐藏掉的话,这样有个不好地方就是点了打印按钮后,这几列不仅仅在打印里看不到,在表里面也看不到了;


--  作者:szoriental
--  发布时间:2014/12/27 15:08:00
--  

用笨办法搞定了,在打印代码后面再加显示的代码;