Evolution document VBA

Re

Sinon, je suis partant pour une MFC sur la ligne de mon équipe LAN sur la feuille RANKING. Ca me permet d'accrocher très vite nos infos quand je travaille sur notre équipe.

Voici comment faire dans la feuille Ranking :
1. Sélectionnez A5 à U16
2. Dans le menu Accueil --> Icône Couleur de remplissage -> Remplacez la couleur orange par "Aucun remplissage"
3. Refaites le point 2 pour chaque groupe de couleur. Donc les lignes A21 à ... 32, et suivant jusque A96 à ... 96
4. Sélectionnez à nouveau A5 à U16 et cliquez sur l'icône MFC
5. Cliquez sur "Gérer les règles" et choisir "Nouvelle Règle"
6. Choisir l'option "Utiliser une formule....". et compléter avec la formule comme montré ci-dessous. Donc =Indirect("A" & Ligne())="LAN"
Pour le choix de la couleur, cliquez sur "Format" puis sur l'onglet "Remplissage"

7. Cliquez sur "Appliquer" puis cliquez sur "Nouvelle Règle"
8. Choisir l'option "Appliquer une mise en forme....." et compléter comme ci-dessous puis choisir la couleur en cliquant sur "Format" --> onglet "Remplissage"

9. Une fois Terminé, cliquez 2x sur OK
10. Faites un test en mettant le mot LAN dans une cellule de la colonne A pour vérifier que le bleu est bien ajouté sur la ligne. En principe vous devez avoir la couleur Orange par défaut et pas de couleur sur la ligne si vous n'avez pas le Mot "LAN" dans une des cellules de la colonne A.
10. Une fois fait, il faut recopier la MFC sur les autres plages de cellules des autres groupes. Là soit vous faites un copier - Collage Spécial --> Format.
Exemple :
- sélectionnez A5 à S16, puis copier (touche command + C). Sélectionnez A21 puis collage Spécial -> Format
- sélectionnez A5 à K16, puis copier. Sélectionnez A37 puis collage Spécial -> Format
etc....

NB : Si vous disposez du petit pinceau dans le menu accueil, cela peut être plus rapide

Rmq : j'ai eu une fois ce message quand j'ai renommé la feuille A2 en J2 ? Peut être ai-je fait une mauvaise manipulation ....

J'ai appuyé sur Fin et j'ai continué mon travail sur le doc sans que cela pose le moindre problème. Si ça arrive encore il vaut mieux cliquer sur Fin ou Déboguer ???

Vous avez dû faire une mauvaise manipulation car cela fonctionne très bien.
L'erreur s'est produit dans le code Worksheet_Activate
Si vous cliquez sur Déboguer, cela vous montre la ligne où se passe l'erreur, ce qui est mieux pour comprendre. Ici le message vous a informé que c'est la barre de défilement verticale (instruction au début du code) qui a posé un souci. Mais souvent Excel ne vous le dit pas, ce qui vous oblige à cliquer sur Débogage pour le savoir.
Si vous cliquez sur FIN, vous annulez l'exécution du code et vous ne savez rien sur l'erreur. Donc vous devrez le relancer et, dans votre projet, en cliquant sur une autre feuille.