Optimisation code
Bonjour les amis,
J'ai créé un fichier pour exécution d'une grille d'éval en utilisant l'enregistrement macro dans l'anglet dév de excel , le code est opérationnel, toutefois j'aimerais savoir si c'est possible de l'épurer un peu.
je vous remerci infiniment.
Bonjour Hicham et
Une petite présentation ICI serait la bienvenue
Si vous ne l'avez pas encore fait, je vous invite à lire la charte du forum [A LIRE AVANT DE POSTER]
qui vous aidera dans vos demandes et réponses sur ce forum et notamment :
- Joignez (si possible) un fichier pour augmenter vos chances d'obtenir de l'aide en cliquant sur le bouton Fichier de l'éditeur. Si votre fichier est trop lourd ou contient des données personnelles, créez une version allégée de votre fichier avec juste assez d'informations pour permettre de comprendre votre problème. Dans tous les cas, ne postez JAMAIS de fichiers avec des informations personnelles ou confidentielles (cet utilitaire peut vous aider à les retirer).
Sinon, si je prends le temps de regarde votre fichier texte, il y a effectivement bon nombres d'optimisation à faire
1) Eviter les "Select"
Sheets("Recap_Ecoutes").Select
Rows("2:2").Select
Selection.insert Shift:=xlDownPeut être remplacé par
Sheets("Recap_Ecoutes").Rows("2:2").Insert Shift:=xlDownOu
Range("E2:L2").Select
Range("E2:L2,N2:U2").Select
Range("N2").Activate
Selection.Style = "Percent"par
Range("E2:L2,N2:U2").Style = "Percent"Etc...
Mais sans fichier pour être certain de ne pas faire d'erreur, cela peut être compliqué
Bonne participation
Cordialement