以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口打印多选  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=137720)

--  作者:15666282205
--  发布时间:2019/7/13 14:44:00
--  窗口打印多选
老师,用的窗口打印,怎么实现任意多选,只打印选择的内容?现在是只要打印就整个表都打印,没法选择。
--  作者:有点蓝
--  发布时间:2019/7/13 14:58:00
--  
根据选择筛选后再打印:http://www.foxtable.com/webhelp/topics/1776.htm

Dim str As String = ""
For Each r As Row In Tables("表A").GetCheckedRows
    str = str & "," & r("_Identify")
Next
Tables("表A").Filter = "[_Identify0] in (" & str.Trim(",") & ")"

--  作者:15666282205
--  发布时间:2019/7/13 21:01:00
--  用逻辑列实现
我用逻辑列筛选实现打印,效果很好。
[此贴子已经被作者于2019/7/14 7:12:01编辑过]