在不同的選項卡上的表中的數據自動篩選列

我想篩選表1中列A中的數據並同時返回多個值。我有下面的代碼，很好的工作，但只在表2中的「C4」搜索，我想過濾器顯示在C4：C20的一切。有什麼建議麼？在不同的選項卡上的表中的數據自動篩選列

Sub Macro2() 
' 
' Macro2 Macro 
' 
    Dim sInput As String 
    sInput = Sheets("Sheet2").Range("C4").Value 
    Sheets("Sheet1").Range("A1:A60000").AutoFilter Field:=1, Criteria1:="=*" & sInput & "*" 
End Sub

來源

2017-03-03 Robert G

使用「陣列」 風味的AutoFilter()方法

Dim sInput As Variant 

sInput = Application.Transpose(Sheets("Sheet2").Range("C4:C20").Value) 

Sheets("Sheet1").Range("A1:A60000").AutoFilter Field:=1, Criteria1:=sInput, Operator:=xlFilterValues

來源

2017-03-03 18:15:05 user3598756

感謝您的快速響應。我試過代碼，但它不喜歡最後一行，有什麼建議？ –

幾乎可以肯定！這是由什麼樣的錯誤信息決定的...... – user3598756

@RobertG，你通過它了嗎？ – user3598756

在不同的選項卡上的表中的數據自動篩選列

回答

相關問題