[Macro] Colorier plusieurs cellules selon une ou plusieurs valeurs

Résolu
gmi19oj19 Messages postés 545 Date d'inscription lundi 10 mai 2004 Statut Membre Dernière intervention 28 septembre 2011 - 24 avril 2007 à 16:59
gmi19oj19 Messages postés 545 Date d'inscription lundi 10 mai 2004 Statut Membre Dernière intervention 28 septembre 2011 - 24 avril 2007 à 17:13
Salut,

J'ai un fichier Excel et je souhaite modifier, par ligne et sur un certain nombre (fixe) de colonnes, la couleur de fond de mes cellules. Voulant automatiser tout ça par paresse, j'me suis dit que j'pourrais essayer par la même occasion de créer ma première macro Excel. Avec ce que j'ai fouillé sur le net, j'ai réussi à pondre ça :

Sub MacroCouleur()
Dim ligne
ligne = 4
For ligne = 4 To 29
    If (Cells(ligne, 5) = "Oui") Then
        Cells(ligne, 1).Interior.ColorIndex = 12
        Cells(ligne, 2).Interior.ColorIndex = 12
        Cells(ligne, 3).Interior.ColorIndex = 12
        Cells(ligne, 4).Interior.ColorIndex = 12
        Cells(ligne, 5).Interior.ColorIndex = 12
        Cells(ligne, 6).Interior.ColorIndex = 12
        Cells(ligne, 7).Interior.ColorIndex = 12
    End If
Next
End Sub

Le problème, c'est que ça marche pas J'ai essayé de modifier mon test (avec ou sans quotes, Oui ou non (mes deux valeurs possibles) ... mais rien à faire, la couleur de fond ne change sur aucune cellule qui devrait être concernée par cela.

N'étant pas vraiment expérimenté en VB, je m'en remet à vous pour un coup de main^^

En passant, vu que le nombre de ligne est suceptible d'augmenter de temps à autres, y aurait il la possiblité de prévoir ça sans modifier le code ? (au pire, c'est pas un drame, juste de la paresse, encore une fois^^)

(Mais quand même, des macros Excel en Java, avec des get et des set ce serait bien plus sympa )

gmi19oj19

2 réponses

jrivet Messages postés 7393 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
24 avril 2007 à 17:08
Salut,
Chez moi ca marche nickel.
Le code que tu postes colore en vert les cellules de la zone A4 :G11 SI et Seulement SI la cellule E de la ligne en cours contient Oui (ATTENTION pas OUI ou oui)
POur ne pas avoir a changer le code tu peux très bien entrer dans deux cellules les lignes de ddépart et de fin et aller les chercher pour ta boucle
@+: Ju£i?n
Pensez: Réponse acceptée
3
gmi19oj19 Messages postés 545 Date d'inscription lundi 10 mai 2004 Statut Membre Dernière intervention 28 septembre 2011 2
24 avril 2007 à 17:13
Salut,

Merci de ta réponse,ça m'a permis de voir qu'en bon boulet, mes données commençait dans la deuxième colonne et non la première, ce qui fait que je dois décaler mes indices ^^

Faut vraiment que je dorme moi

gmi19oj19
3
Rejoignez-nous