Bonjour

Vous avez tenté d'utiliser une variable objet ayant la valeur Nothing.

C'est ce que dit la doc et en fait cela arrive souvent en utilisant "find" .

Je pense que c'est le fait d'utiliser activate car tu ne peux pas sélectionner ce que tu n'as pas trouvé.

Personnellement je positionne un objet range et je teste le nothing avant de l'employer.

set sel = Cells.Find(What:=pprod, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False)
if sel is nothing then
code pas trouvé
else
sel.select
endif


toujours zen