以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 隐藏列 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91084) |
-- 作者:lk15502 -- 发布时间:2016/9/29 7:56:00 -- 隐藏列 打印整个窗口,窗口中一个表只显示了部分列,有一部分有数据的列已经被隐藏,已经显示的列有几列可能会是空列,想在打印时临时隐藏空列,请问老师如何解决?打印按钮代码: With Tables("生产单_table1") Syscmd.Table.ToggleSortAndFilter() .MergeMode = MergeModeEnum.free \'标准合并模式 .MergeCols.Clear() \'清除原来的合并列 .MergeCols.Add("订单品名规格") \'加入要合并的列 .MergeCols.Add("颜色意见") .MergeSort = "订单品名规格,颜色意见" \'设置合并模式下的排序方式 .AllowMerge = True \'启用合并模式 End With \'-------------------------------------- Tables("生产单_table1").AutoSizeRows Dim doc As PrintDoc = e.Form.gernateprintdoc() \'定义一个报表 doc.PageSetting.Landscape = True \'横向打印 doc.Preview() \'预览 \'--------------------- |
-- 作者:有点蓝 -- 发布时间:2016/9/29 8:54:00 -- 参考:http://www.foxtable.com/webhelp/scr/0572.htm |