主题：自定义函数能够作为表筛选的条件？

Tables("主项工作查询_table1").filter="责任部门 in ('" & _Department.Replace(",", "','") & "')  or Functions.Execute("筛选相关部门",_Department,相关部门) =True"

 

内部函数名：筛选相关部门

第一参数为全局变量：_Department

责任部门 和 相关部门：为表字段名称

上句代码，提示编译错误，应为语句结束。

 

不可以。

 

具体问题，做一个实例发上来测试

Tables("表B").filter="第一列 in ('" & _Department.Replace(",", "','") & "')"

表的 “第一列”是多值字段

_Department是全局变量的多值字段

怎么从  表B 中筛选出 第一列 与 _Department 有交集 的 行啊？

即：假设 

1、第一列（多值字段）的 前 三行 的值分别是：

A,D

B,F

C,A

 

2、_Department="B,C"

3、将 第 二 和第三行 筛选出来（该两行的第一列，与_Department多值字段 有交集）

 

 

 

合成条件

 

"第一列 Like '%B%' or 第一列 like '%C%' "