ApplyFiler和追加查詢在Access宏2010

是否有使用宏來應用過濾器的查詢的方式嗎？我附上了我正在嘗試的圖像。謝謝。

Macro

2015-04-20 RJW

在ApplyFilter發生之前，OpenQuery實際上運行了查詢，所以沒有對AppendQuery進行過濾 – RJW

您應該顯示爲主要形式的數據表子窗體的查詢結果。同樣在主窗體中，您應該有一個命令按鈕來運行您的宏。如果是這樣的話，你的所有宏的需求是：

ApplyFilter 
    Filter Name 
    Where Condition = [Region]="US" 
    Control Name Datasheetname

或者您的命令按鈕可以運行的事件過程：

Private Sub CommandButton_Click() 
    Me.Subformname.Form.Filter = "[Region] = " & US & "" 
    Me.Subformname.Form.FilterOn = True 
End Sub

2015-04-21 15:01:36 Dave

Dave，我試圖在嘗試此宏時收到錯誤圖像。感謝您的答覆。 – RJW

您的查詢結果應以某種方式顯示在窗體上，例如數據表作爲子窗體控件。此時，使用命令按鈕控件運行包含ApplyFilter操作的宏很容易。或者，你可以讓命令按鈕運行一小段VBA代碼來做同樣的事情。您的偏好。 – Dave

回答