Hi,
I created a search engine for my data in excel. I worked fine with every one I search within the database. However whenever I searched the word "Dog Toys" this macro code always report error and I dont seem understand why.

Below is my code

Option Compare Text
Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("F5")) Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    Dim bottomC As Integer
    bottomC = Range("J" & Rows.Count).End(xlUp).Row
    Dim x As Long
    For x = bottomC To 10 Step -1
If Not (Cells(x, "J") Like "*" & Target & "*" And Cells(x, "K") Like "*" & Range("F2") & "*" Or Cells(x, "D") Like "*" & Target & "*" And Cells(x, "K") Like "*" & Range("F2") & "*" Or Cells(x, "E") Like "*" & Target & "*" And Cells(x, "K") Like "*" & Range("F2") & "*" Or Cells(x, "F") Like "*" & Target & "*" And Cells(x, "K") Like "*" & Range("F2") & "*" Or Cells(x, "G") Like "*" & Target & "*" And Cells(x, "K") Like "*" & Range("F2") & "*" Or Cells(x, "H") Like "*" & Target & "*" And Cells(x, "K") Like "*" & Range("F2") & "*" Or Cells(x, "L") Like "*" & Target & "*" And Cells(x, "K") Like "*" & Range("F2") & "*" Or Cells(x, "N") Like "*" & Target & "*" And Cells(x, "K") Like "*" & Range("F2") & "*" _
Or Cells(x, "D") Like "*" & Target & "*" And Cells(x, "L") Like "*" & Range("F2") & "*" Or Cells(x, "E") Like "*" & Target & "*" And Cells(x, "L") Like "*" & Range("F2") & "*" Or Cells(x, "F") Like "*" & Target & "*" And Cells(x, "L") Like "*" & Range("F2") & "*" Or Cells(x, "G") Like "*" & Target & "*" And Cells(x, "L") Like "*" & Range("F2") & "*" Or Cells(x, "H") Like "*" & Target & "*" And Cells(x, "L") Like "*" & Range("F2") & "*" Or Cells(x, "J") Like "*" & Target & "*" And Cells(x, "L") Like "*" & Range("F2") & "*" Or Cells(x, "K") Like "*" & Target & "*" And Cells(x, "L") Like "*" & Range("F2") & "*" Or Cells(x, "N") Like "*" & Target & "*" And Cells(x, "L") Like "*" & Range("F2") & "*" _
Or Cells(x, "D") Like "*" & Target & "*" And Cells(x, "J") Like "*" & Range("F2") & "*" Or Cells(x, "E") Like "*" & Target & "*" And Cells(x, "J") Like "*" & Range("F2") & "*" Or Cells(x, "F") Like "*" & Target & "*" And Cells(x, "J") Like "*" & Range("F2") & "*" Or Cells(x, "G") Like "*" & Target & "*" And Cells(x, "J") Like "*" & Range("F2") & "*" Or Cells(x, "H") Like "*" & Target & "*" And Cells(x, "J") Like "*" & Range("F2") & "*" Or Cells(x, "L") Like "*" & Target & "*" And Cells(x, "J") Like "*" & Range("F2") & "*" Or Cells(x, "K") Like "*" & Target & "*" And Cells(x, "J") Like "*" & Range("F2") & "*" Or Cells(x, "N") Like "*" & Target & "*" And Cells(x, "J") Like "*" & Range("F2") & "*" _
Or Cells(x, "D") Like "*" & Target & "*" And Cells(x, "H") Like "*" & Range("F2") & "*" Or Cells(x, "E") Like "*" & Target & "*" And Cells(x, "H") Like "*" & Range("F2") & "*" Or Cells(x, "F") Like "*" & Target & "*" And Cells(x, "H") Like "*" & Range("F2") & "*" Or Cells(x, "G") Like "*" & Target & "*" And Cells(x, "H") Like "*" & Range("F2") & "*" Or Cells(x, "J") Like "*" & Target & "*" And Cells(x, "H") Like "*" & Range("F2") & "*" Or Cells(x, "L") Like "*" & Target & "*" And Cells(x, "H") Like "*" & Range("F2") & "*" Or Cells(x, "K") Like "*" & Target & "*" And Cells(x, "H") Like "*" & Range("F2") & "*" Or Cells(x, "N") Like "*" & Target & "*" And Cells(x, "H") Like "*" & Range("F2") & "*" _
Or Cells(x, "D") Like "*" & Target & "*" And Cells(x, "E") Like "*" & Range("F2") & "*" Or Cells(x, "H") Like "*" & Target & "*" And Cells(x, "E") Like "*" & Range("F2") & "*" Or Cells(x, "F") Like "*" & Target & "*" And Cells(x, "E") Like "*" & Range("F2") & "*" Or Cells(x, "G") Like "*" & Target & "*" And Cells(x, "E") Like "*" & Range("F2") & "*" Or Cells(x, "J") Like "*" & Target & "*" And Cells(x, "E") Like "*" & Range("F2") & "*" Or Cells(x, "L") Like "*" & Target & "*" And Cells(x, "E") Like "*" & Range("F2") & "*" Or Cells(x, "K") Like "*" & Target & "*" And Cells(x, "E") Like "*" & Range("F2") & "*" Or Cells(x, "N") Like "*" & Target & "*" And Cells(x, "E") Like "*" & Range("F2") & "*" _
Or Cells(x, "D") Like "*" & Target & "*" And Cells(x, "F") Like "*" & Range("F2") & "*" Or Cells(x, "H") Like "*" & Target & "*" And Cells(x, "F") Like "*" & Range("F2") & "*" Or Cells(x, "E") Like "*" & Target & "*" And Cells(x, "F") Like "*" & Range("F2") & "*" Or Cells(x, "G") Like "*" & Target & "*" And Cells(x, "F") Like "*" & Range("F2") & "*" Or Cells(x, "J") Like "*" & Target & "*" And Cells(x, "F") Like "*" & Range("F2") & "*" Or Cells(x, "L") Like "*" & Target & "*" And Cells(x, "F") Like "*" & Range("F2") & "*" Or Cells(x, "K") Like "*" & Target & "*" And Cells(x, "F") Like "*" & Range("F2") & "*" Or Cells(x, "N") Like "*" & Target & "*" And Cells(x, "F") Like "*" & Range("F2") & "*" _
Or Cells(x, "D") Like "*" & Target & "*" And Cells(x, "N") Like "*" & Range("F2") & "*" Or Cells(x, "H") Like "*" & Target & "*" And Cells(x, "N") Like "*" & Range("F2") & "*" Or Cells(x, "E") Like "*" & Target & "*" And Cells(x, "N") Like "*" & Range("F2") & "*" Or Cells(x, "G") Like "*" & Target & "*" And Cells(x, "N") Like "*" & Range("F2") & "*" Or Cells(x, "J") Like "*" & Target & "*" And Cells(x, "N") Like "*" & Range("F2") & "*" Or Cells(x, "L") Like "*" & Target & "*" And Cells(x, "N") Like "*" & Range("F2") & "*" Or Cells(x, "K") Like "*" & Target & "*" And Cells(x, "N") Like "*" & Range("F2") & "*" Or Cells(x, "F") Like "*" & Target & "*" And Cells(x, "N") Like "*" & Range("F2") & "*") Then

            Rows(x).EntireRow.Hidden = True
        End If
    Next x
    If Range("F5") = "" Then
        ActiveSheet.Cells.EntireRow.Hidden = False
    End If
    Application.ScreenUpdating = True
    

        
End Sub
PLease help