avoir 1 seul bouton enfoncer a la fois dans un userform

[noon]

bonjours a tous

sur un userform jai 3 bontons
je voudrais quand je clique sur 1 des boutons il s enfonce
et que les 2 autres ce leve

en clair j aimerais qu il y en est un seul d enfoncer a la fois

es ce possible

merci

 

[@+Thierry]

Re Salut Noon, le Forum

Je suppose que l'on parle de "ToggleButtons" car je ne vois pas de "CommandButtons" pouvant rester "enfoncés"...

Si tel est le cas, admettons un UserForm avec trois "ToggleButtons" nommés respectivement "ToggleButton1", "ToggleButton2" & "ToggleButton3"...

Voici un moyen Simple pour que les deux autres ToggleButtons ne restent pas enfoncés :

Private Sub ToggleButton1_Click()
With Me
If .ToggleButton1 = True Then
.ToggleButton2 = False
.ToggleButton3 = False
End If
End With
End Sub
Private Sub ToggleButton2_Click()
With Me
If .ToggleButton2 = True Then
.ToggleButton1 = False
.ToggleButton3 = False
End If
End With
End Sub
Private Sub ToggleButton3_Click()
With Me
If .ToggleButton3 = True Then
.ToggleButton1 = False
.ToggleButton2 = False
End If
End With
End Sub

Mais parlons nous bien de ToggleButtons dans ce fil ?

Bonne Soirée
@+Thierry

 

[noon]

merci thierry

et oui biensur s etait bien un ToggleButtons

merci encore