Bonjour Pascal,
Si je peux t'aider à comprendre ce sera avec plaisir.
Ton code, que tu me dis avoir recopié, est une suite de tests en cascade. C'est à dire :
si c'est toto alors bleu
sinon
si c'est tata alors rouge
sinon
si c'est roro alors jaune
sinon
si c'est lulu alors vert
fin du test
pour écrire ce type de test en VBA tu disposes de différentes fonctions :
1) la fonction classique If ... Then ... Else ... End IF (Si ... alors .... sinon .... fin de test)
2) la fonction Select Case ... End Select, selon la sélection je ferai cela .... fin de sélection
Toutes les 2 aboutissent au même résultat, mais la seconde sera plus rapide et moins 'lourde'.
En effet la première agit en cascade :
est-ce 'toto' si oui alors bleu
sinon
est-ce 'tata' si oui alors rouge
sinon
est-ce 'roro' si oui alors jaune
sinon
est-ce 'lulu' alors vert
dans le cas où c'est 'lulu' tu comprends qu'il doit vérifier les cas précédents avant d'y arriver et de traiter la condition (vert).
Donc si tu avais une centaine de noms ...
Par contre avec la seconde, une fois que tu as précisé sur quel paramètre tu fais ta sélection (ici le paramètre est 'nom'), il ira directement chercher la ligne adéquat :
Case 'lulu'
et traitera l'action
De plus cette méthode a un avantage, car elle met à ta disposition 'un sac fourre tout'. En effet pour tous les cas autres que ceux qui précèdent ('toto', 'tata', 'roro', 'lulu') si tu veux du noir, il suffit d'ajouter :
Case Else
mettre en noir
Dernière remarque, les 'If' en cascade nécessite beaucoup d'application et de rigueur : il ne faut pas oublier un 'End If' chaque fois que tu ouvres un 'If'. D'ailleurs c'est pour cela que l'on utilise les retraits gauche, chaque 'End If' subit le même retrait que son 'If' et que les 'If ... End If' de rang inférieur subissent eux mêmes un retrait plus important.
J'espère avoir été assez clair et surtout n'hésite pas à nous contacter chaque fois que tu désireras comprendre plus aisément un morceau de code. Ce sera avec plaisir que je te rendrai ce service ... entre autres c'est comme celà que dans le temps je procédais, car moi aussi je suis un autodidacte.
Bien amicalement et bonne soirée