参考
Dim t As Table = Tables("表A")t.filter = "第一列 = '123'"t.filter = iif(t.filter>"", "(" & t.filter & ") and ", "") & "第二列 = 'abc'"msgbox(t.filter)