CASE A COCHER AFFICHAGE COULEUR

I

IANISMARCO

Guest
Bonjour,

Novice, j'ai besoin de votre aide.
J'ai un fichier qui comprend 5 colonnes
Descriptif du fichier :

Colonne A : Designation
Colonne B : Commentaire
Colonne C ; Couleur statut
Dans cette colonne, il figure 3 cases à cocher les unes en dessous de l'autre :
1ère case : bouton rouge
2ème case : bouton jaune
3ème case : bouton vert
Colonne D : Statut
Colonne E : Observation.

Je souhaiterais faire apparaître la colonne D STATUT en rouge si la personne à cocher le bouton rouge, jaune si la personne à cocher le bouton jaune .....
Si la personne s'est trompée de case, il peut à tout moment modifier la couleur.
Merci de me communiquer la procédure à suivre pour cocher la case et faire apparaitre dans la colonne statut la couleur choisit.

Merci de votre précieuse aide.
 
I

IANISMARCO

Guest
Bonsoir,

Ci-joint, mon fichier pour descriptif.

Merci beaucoup [file name=test_20050915201849.zip size=12845]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/test_20050915201849.zip[/file]
 

Pièces jointes

  • test_20050915201849.zip
    12.5 KB · Affichages: 22

Bricofire

XLDnaute Impliqué
Bonsoir IANISMARCO :)

Bon un truc simple, tu nommes ta plage D4:D9 'Statut' sous excel, puis dans ton code vba tu mets ceci :


Private Sub greenbuttom_Click()
Range('Statut').Interior.Color = greenbuttom.BackColor
End Sub

Private Sub OptionButton1_Click()
Range('Statut').Interior.Color = OptionButton1.BackColor
End Sub

Private Sub OptionButton2_Click()
Range('Statut').Interior.Color = OptionButton2.BackColor
End Sub

Private Sub OptionButton3_Click()
Range('Statut').Interior.Color = OptionButton3.BackColor
End Sub

Private Sub OptionButton4_Click()
Range('Statut').Interior.Color = OptionButton4.BackColor
End Sub

Private Sub yellowbuttom_Click()
Range('Statut').Interior.Color = yellowbuttom.BackColor
End Sub



J'ai repris ton code, mais tu as intérêt à harmoniser le nommage de tes boutons si tu veux t'y retrouver ensuite ;). On travail ici en couleurs RVB si je ne me trompe pas :whistle:
Tu epux aussi rajouter un bouton pour revenir au 'sans couleur' selon le même principe, sinon en cliquant, les couleurs suivent.
Bonne nuit,

Bfr
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
300 761
Messages
1 987 020
Membres
209 681
dernier inscrit
Excelcrable