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