Coloriage de cellules sous condition

Bonsoir Forum,

Première macro "complexe pour moi" et bien sur ca ne marche pas.

Le but est de colorier les cellules A et B lorsqu'il y a une croix dans la cellule D.

Mais il y a peut etre plus simple que la macro ! J'ai également testé MFC, pas bon non plus.

https://www.excel-pratique.com/~files/doc2/Vert.xls

Merci

Adrien

Salut le forum

Par MEFC sur A2:B20

=MAJUSCULE($D2)="X"

Mytå

Bonsoir

Sélectionne la plage A2:B20

Formule de la MFC :

=$D2="X"

Amicalement

Nad

Bonsoir

Tu peux essayer ce code :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target = "X" Then Target.Offset(0, 1).Interior.ColorIndex = 6
If Target = "" Then Exit Sub
End Sub

Amitié

Air_2

Bonsoir,

Vraiment désolé colorindex = 6 ("jaune.")

Désolé

Je ne me rappel plus de l'indexcolor que tu utilises, tu peux l'adapté a tes besoins.

Encore désolé

Amitié

Air_2

Re le forum

Air_2 il faudrait aussi enlever la couleur si le "X" n'est plus là et vérifier que c'est la colonne D.

Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Column <> 4 Then Exit Sub
  If UCase(.Value) = "X" Then
    Range(Cells(.Row, 1), Cells(.Row, 2)).Interior.ColorIndex = 35
  Else
    Range(Cells(.Row, 1), Cells(.Row, 2)).Interior.ColorIndex = xlNone
  End If
End With
End Sub

Mytå

Bonsoir,

Merci à tous. Maintenant j'ai le choix.

En MFC, c'est plus facile pour moi. J'avais vu, il y a quelques mois un lien pour avoir un éventail de MFC. Dossier fait par un "Maître" de la question. J'ai perdu ce lien avec mon pb de disque dur. Est-il possible de la re balancé ? si connu.

Merci

Adrien

Re le forum

Adrien un lien : Dans Cours-Astuces

Mytå

RE

Super, merci pour le lien.

Merci à tous.

Adrien

Rechercher des sujets similaires à "coloriage condition"