使用輸入框過濾文本 - VBA

我想用一個查詢從用戶（輸入框）過濾預先確定的列使用輸入框過濾文本 - VBA

例如：過濾器列「L」與用戶輸入文本「喬伊」。任何人都可以指導我需要做什麼？這是我正在嘗試的代碼...

Set wSheetStart = ActiveSheet 
Set rFilterHeads = Range("L1", Range("IV1").End(xlToLeft)) 

With wSheetStart 
    .AutoFilterMode = False 
    rFilterHeads.AutoFilter 
    strCriteria = InputBox("Enter Criteria") 
    If strCriteria = vbNullString Then Exit Sub 
    rFilterHeads.AutoFilter Field:=3, Criteria1:=strCriteria   
End With

來源

2011-12-27 User124726

什麼不符合您當前的代碼預期？ – JMax 2011-12-27 12:40:00

類似於http://stackoverflow.com/q/8532986/78522 – 2011-12-27 12:57:06

感謝@iDevlop，幫助。 – User124726 2011-12-27 15:09:40

使用循環+ Like限制進入任何您需要的內容。

Do 
    strCriteria = UCase(InputBox("Enter criteria")) 
Loop Until Len(strCriteria) = 0 Or strCriteria Like "?????" 
If Len(strCriteria) = 0 Then Exit Sub 
'continue...

來源

2011-12-27 12:56:07

使用輸入框過濾文本 - VBA

回答

相關問題