以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]条件筛选 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=145151) |
-- 作者:lgj716330 -- 发布时间:2020/1/9 21:00:00 -- [求助]条件筛选 1、Tables("完成情况_Table1").filter="年份 = \'" & N2 & "\' And 月份=\'" & y2 & "\' And 累计差距<=0" 2、For Each bm As String In DataTables("完成情况_Table1").GetValues("部门名称") 3、
Tables("完成情况_Table1").filter = "" 4、 Tables("完成情况_Table1").filter = "部门名称 = \'" & bm & "\'" Next 首先根据1把符合条件的结果筛选出来,表中有一列是“部门名称”,然后获取筛选结果的部门名称集合,再取消原来的筛选,最后根据1结果中的部门名称重新筛选,上面结果不对,请改正 [此贴子已经被作者于2020/1/10 8:47:24编辑过]
|
-- 作者:lgj716330 -- 发布时间:2020/1/10 0:41:00 -- [此贴子已经被作者于2020/1/10 0:46:19编辑过]
|
-- 作者:有点蓝 -- 发布时间:2020/1/10 10:08:00 -- Dim str As String = DataTables("完成情况_Table1").GetComboListString("部门名称","年份 = \'" & N2 & "\' And 月份=\'" & y2 & "\' And 累计差距<=0") Tables("完成情况_Table1").filter = "部门名称 in (\'" & str.replace("|","\',\'") & "\')"
|