Hi folks glad to see this place is still going strong !
I was wondering if someone could point me in the right direction here.
I have two search macros as below
Sheets("IMPORT").Select
Cells.Find(What:="93167284", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Rows(ActiveCell.Row).Select
Selection.Cut
Sheets("Main").Select
Rows("2:2").Select
ActiveSheet.Paste
Sheets("IMPORT").Select
Sheets("IMPORT").Select
Cells.Find(What:="3700401", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Rows(ActiveCell.Row).Select
Selection.Cut
Sheets("Main").Select
Rows("3:3").Select
ActiveSheet.Paste
Sheets("IMPORT").Select
What code can i put in between those so it doesnt fall over if it doesnt find what its looking for and just moves onto the next find ?
Many thanks in advance
|