Colorier des lignes dans Excel 2007

Bonjour,

quelqu'un sait il comment colorier (remplissage ) automatiquement 1 ligne sur 2 dans une feuille excel ?

Bonjour

Avec Excel 2003, pour colorer une ligne sur 2 d'un tableau ou d'une feuille, on sélectionne le tableau ou la feuille et on applique une MFC (menu "Format" "Mise en forme conditionnelle") avec en condition 1 la formule:

=MOD(LIGNE();2)

et on choisit la couleur désirée.

Avec excel 2007, ne l'ayant pas, je ne puis te dire si cette méthode fonctionne.

Cordialement

bonsoir

En fonction de la structure de tes données, tu pourrais aussi utiliser la notion de Tableau disponible dans Excel2007 (L'équivalent des Listes dans Excel2003):

Sélectionne ta plage de cellules

Sélectionne l'onglet "Insertion" dans le ruban.

Clique sur le bouton "Tableau" dans le groupe "Tableaux".

Tu peux ensuite personnaliser le style du tableau depuis l'onglet "Outils u tableau"/

bonne soirée

michel

Bonjour

je me suis fait une petite macro pour colorier une ligne sur deux en vert, je te la partage. Tu n'as qu'à sélectionner la zone ou tu veux colorier les lignes et ensuite exécuter la macro.

Public Sub LigneVerte()

    Dim MaPlage As Range
    Dim LigneVerte As Boolean

    Set MaPlage = Selection
    LigneVerte = True

    MaPlage.Interior.ColorIndex = xlNone

    For i = 1 To MaPlage.Rows.Count
        Select Case LigneVerte
            Case True
                MaPlage.Rows(i).Interior.ColorIndex = 35
                LigneVerte = False
            Case False
                MaPlage.Rows(i).Interior.ColorIndex = xlNone
                LigneVerte = True
        End Select
    Next i

End Sub

la même chose mais pour les colonnes

Public Sub ColonneVerte()

    Dim MaPlage As Range
    Dim LigneVerte As Boolean

    Set MaPlage = Selection
    LigneVerte = True

    MaPlage.Interior.ColorIndex = xlNone

    For i = 1 To MaPlage.Columns.Count
        Select Case LigneVerte
            Case True
                MaPlage.Columns(i).Interior.ColorIndex = 35

                LigneVerte = False
            Case False
                MaPlage.Columns(i).Interior.ColorIndex = xlNone
                LigneVerte = True
        End Select
    Next i

End Sub

J'ai mal copié mon code, il faudrait rajouter

set MaPlage = nothing

avant le end sub

merci à tous j'essaie. L'idée c'est que si on rajoute et insère des lignes, le coloriage s'adapte automatiquement...

la commande mod pour la mise en forme conditionnelle marche impec merci

Hé oui, ça marche !

Microsoft a en effet pas mal remanié l'interface, et nous fait perdre cela dit un temps fou à retrouver les commandes "basiques" qui sont toutes dispersées aux 4 coins du "ruban", mais heureusement les fonctions n'ont quant à elles quasiment pas changé (du moins je n'ai pas constaté à ce jour de changement...)

Donc Amadéus va pouvoir continuer à aider tout plein de monde sur le forum avec ses super formules pendant encore longtemps...

Et il ne restera plus à jpp_nice qu'à éditer son post pour y ajouter [Résolu]

C'était un petit mot juste en passant, bonne nuit !

Elbie