Bonjour Rem$
Sheets("Feuilxxx").Visible = True a mettre en début de code
Sheets("Feuilxxx").Visible = False en fin de code
Avec Application.ScreenUpdating=False .... Ni vu ni connu
Ta feuille est "démasquée", l'info est traitée puis la feuille est de nouveau masquée.
Plus simple, as-tu par ailleurs essayé de "nommer" tes zones de recherches. Cela permet d'utiliser ces zones sans que les feuilles qui les contiennent soient visibles.
@+ GD