Fejl kontrol

Hej
Jeg har en makro der ud fra den aktive celleværdi i et ark søger efter tilsvarende værdi i et andet ark. Det fungerer fint, men hvis værdien der søges efter ikke findes, fejler makroen. Hvordan laver jeg en kontrol af om værdien findes? Jeg ville gerne have at der vises en meddelelsesboks der fortæller at den søgte værdi ikke findes. Min kode ser således ud:

Sub findbookingID()

' findbookingID Makro

Dim CelleVærdi As String
   
    CelleVærdi = ActiveCell
    Sheets("Placering").Select
        Cells.Find(What:=CelleVærdi, After:=ActiveCell, LookIn:=xlValues, LookAt _
        :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
        False, SearchFormat:=False).Activate
    ActiveCell.EntireRow.Select
   
End Sub