一个页面的筛选搞定: Dim Filter As String With e.Form.Controls("图号") If .Value IsNot Nothing Then Filter = Filter & "图号 = '" & .Value & "' and 班组 = '车床组' " End If End With If Filter > "" Then Tables("窗口1_Table1").Filter = Filter End If 第二个筛选应该怎么写代码,是否要用多个控件去绑定同一个列