vba excel comment colorier des lignes sous co Résolu/Fermé

Question

Bonjour,

comment faire sous vba excel pour changer la couleur de plusieurs cellules sous conditions.
je voudrais que dans ma colonne A ,si le texte de la cellule commence par samedi,toutes les  cellules contigues de la même ligne soit par exemple en rouge. pas la ligne complète mais seulement dans la limite du tableau.
je débute en vba.
quelqu'un pourrait il m'aider

merci d'avance

heng

lermite222 · Answer

Bonjour,
une solution parmi d'autre...
Dans le module de la feuille

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static AncAdress As String
Static AncCell As Variant, L As Long, C As Integer
    If AncAdress <> "" And Target.Count = 1 Then 'pour 1ère initialisation.
        If AncCell <> Range(AncAdress) And Range(AncAdress).Column = 1 Then
            If UCase(Left(Range(AncAdress), 6)) = "SAMEDI" Then
                L = Range(AncAdress).Row
                C = Cells(L, 255).End(xlToLeft).Column
                Range(Cells(L, 1), Cells(L, C)).Interior.ColorIndex = 6 'Jaune
            End If
        End If
    End If
    If Target.Count = 1 Then
        AncAdress = Target.Address
        AncCell = Target.Value2
    End If

End Sub

A+

Mike-31 · Answer

Salut à vous,

Tu peux simplement le faire sans VBA, tu mets en surbrullance la ligne de ton tableau et Format/Mise en Forme Conditionnelle, sélectionnes la Formule est et dans la zone de saisie tapes  =$A2="samedi" pour la ligne 2 et format choisis ta couleur. Et incrémente vers le bas

A+

Vba excel comment colorier des lignes sous co

2 réponses

Discussions similaires