楼主,是出错,还是没有产生作用? 如果出错,就至少要给一个错误提示的。
Messagebox.show(iif(bm.Value="", "[部门名称] not In ( 'IT部')", "[部门名称] In ( '" & bm.value.Replace(",","','") & "')" )