OVH Cloud OVH Cloud

Onglet en couleur différente

1 réponse
Avatar
crole
Bonjour le groupe
Comment puis-je =E0 l'aide d'un boutonclic copier la feuille en cour et
lui donner la couleur verte si la valeur de la case C4 =3D "anne" et bleu
si la valeur de la case C4 =3D "bruno"

Merci au groupe pour les r=E9ponse=20
Amicalement
Crole

1 réponse

Avatar
David
Bonjour,

Alors voila un petit code qui te permet de tester si la valeur de C4 est
Anne et ensuite modifie la couleur de toutes les cellules contenant des
données :
Private Sub CommandButton1_Click()

If ActiveSheet.Range("C4") = "Anne" Then

ActiveSheet.UsedRange.Interior.Color = vbRed

End If

End Sub


Bonne journée

David
"crole" wrote in message
news:
Bonjour le groupe
Comment puis-je à l'aide d'un boutonclic copier la feuille en cour et
lui donner la couleur verte si la valeur de la case C4 = "anne" et bleu
si la valeur de la case C4 = "bruno"

Merci au groupe pour les réponse
Amicalement
Crole