Macro-Recherche cellule

Bonjour,

Tout d'abord, voici mon programme :

For i = 4 To 135
Sheets("BDD").Select
Cells.Find(What:=Worksheets("Suivi").Cells(i, 2), After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate


ActiveCell.Offset(0, 38).Select
Selection.Copy
Worksheets("Suivi").Activate
Cells(i, 4).Select
ActiveSheet.Paste
Next


Explcation :

Je cherche des valeurs sur "BDD" provenant de "Suivi", ma recherche sur les cellules fonctionne jusqu'à ce qu'une valeur de "Suivi" n'existe pas dans "BDD", et là, ça bloque. J'aimerai ignorer le fait que la valeur n'existe pas et continuer à faire les recherches jusqu'au bout. Je pensais utiliser une boucle if...