Good afternoon. I have spreadsheets with multiple worksheets and my user wants to search for certain names. I start off with this
And get down to
The trouble is that it falls over at the second consecutive worksheet where nothing matches the find. I've tried a couple of
to trap & move on but it fails on the first loop (the first 'Find') of the second sheet where nothing matches.
Any ideas?
Many thanks,
Des.
Code:
MyText = InputBox("Type the text for the rows you want to cut.", "Look for this")
And get down to
Code:
Range("E:E").Find(What:=MyText, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate
The trouble is that it falls over at the second consecutive worksheet where nothing matches the find. I've tried a couple of
Code:
If ....Then
Any ideas?
Many thanks,
Des.