셀에 입력하는 동안 필터링

Question

셀에 입력 한 값을 기반으로 행을 동적으로 필터링 할 수 있습니까? 데이터가 A10:A1000 인 열 범위가 있다고 가정하고 A1 셀에 입력하는 기준에 따라 해당 범위를 필터링합니다.

필자는 입력 할 때 필터가 런타임에 동적으로 반응하기를 원합니다. [Enter]를 누른 후에는 필터를 사용하지 마십시오. 텍스트 상자를 사용하여 해결책을 찾았습니다. http://www.vbforums.com/showthread.php?647621-Excel-filtering-while-typing

그러나 바람직하게는 일부 텍스트 상자가 아닌 셀에 입력하는 것이 좋습니다. 가능한가?

Answer 1

@PermaNoob이 최상의 솔루션입니다. Excel에서는 "편집"모드에있을 때 VBA를 사용하여 셀 값을 확인할 수 없습니다. 그러나 A1 위에 텍스트 상자를 놓고 "동적"검색을 실행하는 데 사용할 수 있습니다.

Start VBA macro when editing a cell

는

Private Sub TextBox1_Change() 
Dim searchArea As Range, searchRow As Range, searchCell As Range 
Dim searchString As String 
Dim lastRow As Integer 

Application.ScreenUpdating = False 
searchString = "*" & LCase(TextBox1.Value) & "*" 

' unhide rows to have the full search field when editing 
Rows.Hidden = False 

lastRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row 
Set searchArea = Me.Range("A5", "A" & lastRow) 'Me.Range("A5").End(xlDown)) 
searchArea.EntireRow.Hidden = True 

For Each searchRow In searchArea.Rows 
    For Each searchCell In searchRow.Cells 
    If LCase(searchCell) Like searchString Then 
     searchRow.Hidden = False 
     Exit For 
    End If 
    Next searchCell 
Next searchRow 

Application.Goto Cells(1), True 
Application.ScreenUpdating = True 

End Sub