Bonjour,
J'ai un formulaire avec un [Champ1] qui contient des nom, le formulaire affiche en continu, j'ai donc une liste de nom.
Comme la mise en forme conditionnelle est limitée à trois, j'essaye de faire cela en VBA.
J'ai donc créer une rectangle [Boite8], qui devrait changer de couleur de fond si par exemple le nom est "cedric" et une autre couleur si le nom est "patricia"
Pour faire un test j'ai mis le code suivant sur le Click du [Champ1]
Donc lorsque je clic sur le [Champ1] contenant "cedric", le fond du rectangle change de couleur et si je clic sur le [Champ1] contenant "patricia", le fond change aussi de couleur,
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Private Sub Champ1_Click() If Me.Champ1.Value = "cedric" Then Me.Boîte8.BackColor = RGB(255, 255, 100) Else Me.Boîte8.BackColor = RGB(255, 255, 255) If Me.Champ1.Value = "patricia" Then Me.Boîte8.BackColor = RGB(155, 225, 100) Else Me.Boîte8.BackColor = RGB(255, 255, 255) End If End If End Sub
MAIS MALHEUREUSEMENT TOUT LES RECTANGLES CHANGENT DE COULEUR ! PAS SEULEMENT CELUI DE LA LIGNE...
J'ai trouvé aussi l'option FormatConditions mais je ne n'arrive pas à l'utiliser... :-(
Pourriez-vous m'aider ?
Merci d'avance
Ps le code est mit sur le clic du [Champ1], ou dois-je le mettre pour que cela fonctionne automatiquement ?
Partager