Search for all instances of a string then hide all other rows

[jessmall]

Actually I was able to write a code using autofilters BUT I can only search one column and I need to search 2 (both colA and colB):

[VBA]
Sub Search()
'written by jessmall
Dim r As Range, filt As Range, j As Long, k As Long

'Set r = Range("A5").CurrentRegion
Dim MyData As String

MyData = InputBox("Search by Format:xyz")
If MyData = "" Then Exit Sub
' search all sheets in workbook

Set r = Range("A5").CurrentRegion


r.AutoFilter field:=1, Criteria1:=MyData & "*"

End Sub
[/VBA]