두 개의 자동 필터링 된 열의 텍스트 상자를 사용하여 검색

Question

텍스트 상자를 사용하여 두 개의 자동 필터링 된 열 (프로젝트 번호 및 프로젝트 이름) 중 하나에서 결과를 검색하려고합니다. 내 코드는 다음과 같습니다.

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 

한 열을보고 싶습니다. 결과가 없으면 다른 열을 검색해야합니다.

도움 주셔서 감사합니다.

Answer 1

저는 실제로 두 개의 정보 열을 연결 한 다음 그 대신에 검색하는 새로운 열을 만들었습니다. 정상적으로 작동합니다.

나는 여전히 위의 코드에 무엇이 잘못되었는지 알아내는 데 관심이 있습니다.