[VBA] Copier une feuille de calcul ?

Bonjour,

J'utilise la fontion :

Worksheets("Certificat").Copy before:=Worksheets("Certificat")
Worksheets("Mesures").Copy before:=Worksheets("Certificat")

Cependant lors de l'exécution, la page crée est automatique sélectionné. Le problème c'est que lorsqu'on copie plusieurs page, on voit les feuilles défilés et j'aimerais justement que la feuille "vu" reste celle du certificat.

J'ai donc essayé le code suivant :

Worksheets("Certificat").Copy before:=Worksheets("Certificat")
Worksheets("Certificat").Select
Worksheets("Mesures").Copy before:=Worksheets("Certificat")
Worksheets("Certificat").Select

Mais encore une fois, si on copie plusieurs feuilles de calcul, l'écran "clignote" à cause du changement successif de feuilles.

Quelqu'un aurait une solution pour rendre ces actions invisibles pour l'utilisateur ?