[VBA-E] Eviter les clignotements

Bonjour,

Je suis sur une feuille A qui contient des boutons.
Au clic, il y a des copier coller dans tous les sens.
Actuellement je vois les différentes selections très rapidement. (effet de clignotement)
Je voudrais uniquement voir ma feuille A et le sablier mais jamais les autres feuilles.

J'utilise ce genre de code :

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub cmd_1()   Sheets("Feuil2").Range(Sheets("Feuil2").Cells(3, 7), Sheets("Feuil2").Cells(184, 7)).Copy Sheets("Feuil2").Cells(3, 4).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False     <div style="margin-left:40px">...</div> End sub

---

Merci de bien vouloir de donner un coup de pouce :ccool:

Inhibe donc la mise à jour de l'affichage pendant ce traitement et rétablis-la à la fin du traitement !

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub cmd_1() Application.ScreenUpdating = False Sheets("Feuil2").Range(Sheets("Feuil2").Cells(3, 7), Sheets("Feuil2").Cells(184, 7)).Copy Sheets("Feuil2").Cells(3, 4).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False ... End sub

---

Avec ca ca doit etre bon

Nikel merci bien !