I am using the below code. However, when I delete any contents from any cell I am getting a debug error. Can't figure out why.
Private Sub Worksheet_Change(ByVal Target As Range)
'search
If Target = Range("Q11") Then
If InStr(1, Range("Q11"), "Search") > 0 Then Search
End If
End Sub
--- then search calls a macro.
Private Sub Worksheet_Change(ByVal Target As Range)
'search
If Target = Range("Q11") Then
If InStr(1, Range("Q11"), "Search") > 0 Then Search
End If
End Sub
--- then search calls a macro.