vite fais, je suis a la bourre
Application.ScreenUpdating = False
Cells(1, 1).Select
Sheets("Feuil2").Select 'une autre feuil
Sheets("Feuil1").Select 'la feuille qui contient le bouton
Application.ScreenUpdating = True
ca je l'ai mis quand je clique sur le bouton
ca a marché, je ne sais pas si cela te conviens, je verrais ta réponse après, bonne soirée
Munchkin