打印整个窗口，窗口中一个表只显示了部分列，有一部分有数据的列已经被隐藏，已经显示的列有几列可能会是空列，想在打印时临时隐藏空列，请问老师如何解决？打印按钮代码：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() '预览
'---------------------
加好友 
发短信
Post By：2016/9/29 7:56:00 [只看该作者]
