salut tout le monde
Donc voila j'aurais une petite requete j'ai beau tourner tout les solutions et avec ma maigre experience en programmation VB font que je ne trouve pas depuis trois jours et ca menerve lol je viens implorer votre secours donc voila
Ce que je voudrais avoir une case à cocher en A1 et dans les cases B1 a D1 des ecritures (ex: colonne B : travail à faire, Colonne C: Stade d'avancement et colonne D: Date butoir)
Je voudrais que lorsque la case est cocher que B11 soit de couleur bleu et en taille 8 et que lorsque la case est decocher que ce soit orange et en taille 12
pour le moment j'ai trouver ceci (je ne suis pas sur des couleurs)
Sub Caseacocher107_QuandClic()
If Checkbox1 = True then
Range("B11").Select
Selection.Font.ColorIndex = 41
Selection.Font.Size = 8
ElseIf Checkbox1 = False then
Range("B11").Select
Selection.Font.ColorIndex = 46
Selection.Font.Size = 12
EndIf
EndSub
Voila celle ci ne marche pas et je ne trouve pas si vous pouviez me trouver une solutions merci d'avance
bibi a tout le monde
Donc voila j'aurais une petite requete j'ai beau tourner tout les solutions et avec ma maigre experience en programmation VB font que je ne trouve pas depuis trois jours et ca menerve lol je viens implorer votre secours donc voila
Ce que je voudrais avoir une case à cocher en A1 et dans les cases B1 a D1 des ecritures (ex: colonne B : travail à faire, Colonne C: Stade d'avancement et colonne D: Date butoir)
Je voudrais que lorsque la case est cocher que B11 soit de couleur bleu et en taille 8 et que lorsque la case est decocher que ce soit orange et en taille 12
pour le moment j'ai trouver ceci (je ne suis pas sur des couleurs)
Sub Caseacocher107_QuandClic()
If Checkbox1 = True then
Range("B11").Select
Selection.Font.ColorIndex = 41
Selection.Font.Size = 8
ElseIf Checkbox1 = False then
Range("B11").Select
Selection.Font.ColorIndex = 46
Selection.Font.Size = 12
EndIf
EndSub
Voila celle ci ne marche pas et je ne trouve pas si vous pouviez me trouver une solutions merci d'avance
bibi a tout le monde