使用文本框搜索兩個自動過濾的列的任何部分

我試圖在使用文本框的兩個自動過濾列（項目編號和項目名稱）中的任何一箇中搜索結果。我的代碼如下;使用文本框搜索兩個自動過濾的列的任何部分

Private Sub TextBox3_Change() 

Application.Calculation = xlManual 

Application.ScreenUpdating = False 
Selection.AutoFilter Field:=5, Criteria1:="*" & TextBox3.Value & "*", Operator:=xlOr 

On Error Resume Next 

If Range("B7:B1307").SpecialCells(xlCellTypeVisible).Count = 0 Then 
Call ClearAllFilters 

    ActiveSheet.Range("B7:B1307").AutoFilter Field:=5, Criteria1:="<>" 

Selection.AutoFilter Field:=6, Criteria1:="*" & TextBox3.Value & "*", Operator:=xlOr 
End If 
    Application.ScreenUpdating = True 
Application.Calculation = xlAutomatic 
End Sub

我希望它看起來在一列中，如果它找不到結果，那麼它需要在另一列中搜索。

感謝您的幫助！

來源

2013-04-02 Matteous

你有什麼問題？是不是範圍....計數= 0工作？更具體地說 –

對不起，上面的代碼發生了什麼是自動過濾器字段6正在返回搜索查詢（沒有結果），但自動過濾器字段5正在執行*的搜索查詢。我需要它來搜索自動篩選字段6，如果沒有結果，它通過自動篩選字段5進行搜索。5 希望這是有道理的！謝謝 – Matteous

你的過濾器看起來很奇怪..你可以發佈你的數據的截圖嗎？ –

我實際上剛剛創建了一個連接兩列信息的新列，然後搜索它 - 它工作正常。

我仍然有興趣找出上述代碼有什麼問題。

來源

2013-04-04 02:49:36 Matteous

使用文本框搜索兩個自動過濾的列的任何部分

回答

相關問題