[VBA] Copier une feuille de calcul ?

Résolu
Kauracks -  
 Kauracks -
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 ?

2 réponses

  1. paf
     
    bonjour,

    Application.ScreenUpdating = False
    en début d'action

    Application.ScreenUpdating = True
    en fin d'action
    2