Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jacky
Bonjour, Ceci peut-être: '-------- Private Sub ToggleButton1_Click() If ToggleButton1.Caption = "Début" Then ToggleButton1.Caption = "Fin" Else ToggleButton1.Caption = "Début" End If End Sub '--------- Salutations JJ
"jack 43" a écrit dans le message de news:
Bonjour,
Voilà je souhaiterais que le texte sur le bouton bascule soit "début" si la
cellule A1 est vrai, soit "fin" si le résultat de la cellule A1 est Faux.
J'ai essayer une macro que je met dans le fichier joint.
http://cjoint.com/?dcnLV8bzJR
MERCI et A +
Bonjour,
Ceci peut-être:
'--------
Private Sub ToggleButton1_Click()
If ToggleButton1.Caption = "Début" Then
ToggleButton1.Caption = "Fin"
Else
ToggleButton1.Caption = "Début"
End If
End Sub
'---------
Salutations
JJ
"jack 43" <jack43@discussions.microsoft.com> a écrit dans le message de
news:1B826633-DF96-4935-BA6F-24632C2EDBA6@microsoft.com...
Bonjour,
Voilà je souhaiterais que le texte sur le bouton bascule soit "début" si
la
cellule A1 est vrai, soit "fin" si le résultat de la cellule A1 est Faux.
J'ai essayer une macro que je met dans le fichier joint.
Bonjour, Ceci peut-être: '-------- Private Sub ToggleButton1_Click() If ToggleButton1.Caption = "Début" Then ToggleButton1.Caption = "Fin" Else ToggleButton1.Caption = "Début" End If End Sub '--------- Salutations JJ
"jack 43" a écrit dans le message de news:
Bonjour,
Voilà je souhaiterais que le texte sur le bouton bascule soit "début" si la
cellule A1 est vrai, soit "fin" si le résultat de la cellule A1 est Faux.
J'ai essayer une macro que je met dans le fichier joint.