Bonjour,

Je cherche a accélérer l'éxécution du code d'une macro, sur un PC rapide cela va encore, mais au boulot ça rame pas mal.
Le code source fonctionne mais dès que j'essaye de compiler cela me génère des erreurs; voici le code source :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
     Sheets("Di imp").Select
    Call Macro_effac_sem                   '  effacer et re mise en forme des feuilles
    Sheets("Lun imp").Select
    Call Macro_effac_sem
    Sheets("Mar imp").Select
    Call Macro_effac_sem
    Sheets("Mer imp").Select
    Call Macro_effac_sem
    Sheets("Jeu imp").Select
    Call Macro_effac_sem
    Sheets("Ven imp").Select
    Call Macro_effac_sem
    Sheets("Sam imp").Select
    Call Macro_effac_sem
voici un des codes que j'ai essayé
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
  If confirmation = vbYes Then
    'Call ControleMotDePasse("prod3", 2)
    Application.ScreenUpdating = False
 
  Dim strFeuille As String
  strFeuille = ActiveSheet.Name
 
  Union(Sheets("Di imp,Lun imp,Mar imp,Mer imp,Jeu imp,Ven imp,Sam imp")).Select
  Call Macro_effac_sem                   '  effacer et remise en forme des feuilles
ce qui me génère : erreur de compilation : argument non facultatif
Merci de votre aide

Dom