JORDAN
XLDnaute Impliqué
Bonjour le Forum,
Avec le code suivant, j'arrive à changer le
texte de mon ToggleButton mais par contre la
couleur du texte reste noir.
Comment doit-on faire ?
Merci.
Avec le code suivant, j'arrive à changer le
texte de mon ToggleButton mais par contre la
couleur du texte reste noir.
Comment doit-on faire ?
Merci.
Code:
Private Sub ToggleButton1_Change()
If ToggleButton1.Value = True Then
ToggleButton1.ForeColor = 6
ToggleButton1.Caption = 'Rechercher une commande en cours'
ElseIf ToggleButton1.Value = False Then
ToggleButton1.ForeColor = 12
ToggleButton1.Caption = 'Enregistrer une nouvelle commande'
End If
End Sub