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
Dédé
Salut Aldo !
Si cewla peut t'être utile ...
Private Sub ToggleButton1_Click()
If ToggleButton1.Value = True Then Application.ShowWindowsInTaskbar = False ToggleButton1.Caption = Range("a1").Value Else Application.ShowWindowsInTaskbar = True ToggleButton1.Caption = Range("a2").Value End If End Sub
Dans l'espoir d'avoir pu te donner une solution ...
Avec mes salutations les meilleures
Dédé
"ALDO" a écrit dans le message de news: #
Bonjour,
Je voudrais savoir comment faire pour que les ToggleButtons affiche un texte
qui se trouve dans une cellule et qui change selon le contenu.
En vous remerciant par avance.
ALDO
Salut Aldo !
Si cewla peut t'être utile ...
Private Sub ToggleButton1_Click()
If ToggleButton1.Value = True Then
Application.ShowWindowsInTaskbar = False
ToggleButton1.Caption = Range("a1").Value
Else
Application.ShowWindowsInTaskbar = True
ToggleButton1.Caption = Range("a2").Value
End If
End Sub
Dans l'espoir d'avoir pu te donner une solution ...
Avec mes salutations les meilleures
Dédé
"ALDO" <claude.karcher@wanadoo.fr> a écrit dans le message de news:
#4eJTiuPDHA.2228@tk2msftngp13.phx.gbl...
Bonjour,
Je voudrais savoir comment faire pour que les ToggleButtons affiche un
texte
qui se trouve dans une cellule et qui change selon le contenu.
If ToggleButton1.Value = True Then Application.ShowWindowsInTaskbar = False ToggleButton1.Caption = Range("a1").Value Else Application.ShowWindowsInTaskbar = True ToggleButton1.Caption = Range("a2").Value End If End Sub
Dans l'espoir d'avoir pu te donner une solution ...
Avec mes salutations les meilleures
Dédé
"ALDO" a écrit dans le message de news: #
Bonjour,
Je voudrais savoir comment faire pour que les ToggleButtons affiche un texte
qui se trouve dans une cellule et qui change selon le contenu.
En vous remerciant par avance.
ALDO
ALDO
Tip top... ;-)
Merci à tous les deux...
"Dédé" a écrit dans le message de news: #
Salut Aldo !
Si cewla peut t'être utile ...
Private Sub ToggleButton1_Click()
If ToggleButton1.Value = True Then Application.ShowWindowsInTaskbar = False ToggleButton1.Caption = Range("a1").Value Else Application.ShowWindowsInTaskbar = True ToggleButton1.Caption = Range("a2").Value End If End Sub
Dans l'espoir d'avoir pu te donner une solution ...
Avec mes salutations les meilleures
Dédé
"ALDO" a écrit dans le message de news: #
Bonjour,
Je voudrais savoir comment faire pour que les ToggleButtons affiche un texte
qui se trouve dans une cellule et qui change selon le contenu.
En vous remerciant par avance.
ALDO
Tip top...
;-)
Merci à tous les deux...
"Dédé" <NOSPAMsugus12002@yahoo.fr> a écrit dans le message de news:
#ckrJ2uPDHA.704@tk2msftngp13.phx.gbl...
Salut Aldo !
Si cewla peut t'être utile ...
Private Sub ToggleButton1_Click()
If ToggleButton1.Value = True Then
Application.ShowWindowsInTaskbar = False
ToggleButton1.Caption = Range("a1").Value
Else
Application.ShowWindowsInTaskbar = True
ToggleButton1.Caption = Range("a2").Value
End If
End Sub
Dans l'espoir d'avoir pu te donner une solution ...
Avec mes salutations les meilleures
Dédé
"ALDO" <claude.karcher@wanadoo.fr> a écrit dans le message de news:
#4eJTiuPDHA.2228@tk2msftngp13.phx.gbl...
Bonjour,
Je voudrais savoir comment faire pour que les ToggleButtons affiche un
texte
qui se trouve dans une cellule et qui change selon le contenu.
If ToggleButton1.Value = True Then Application.ShowWindowsInTaskbar = False ToggleButton1.Caption = Range("a1").Value Else Application.ShowWindowsInTaskbar = True ToggleButton1.Caption = Range("a2").Value End If End Sub
Dans l'espoir d'avoir pu te donner une solution ...
Avec mes salutations les meilleures
Dédé
"ALDO" a écrit dans le message de news: #
Bonjour,
Je voudrais savoir comment faire pour que les ToggleButtons affiche un texte
qui se trouve dans une cellule et qui change selon le contenu.