Afficher combobox lorsque bouton radio coché et le cacher sinon

[Ark30]

Bonsoir, j'ai essayé le code suivant mais le combobox ne s'affiche pas lorsque je quitte le bouton radio:

Private Sub OptionButton3_Click()
If OptionButton3 Then
Combobox1.Visible = True
Else
Combobox1.visible = False
End If
End Sub

Et ça marche pas

Merci pour votre aide

 

[t_oualid]

Re : Afficher combobox lorsque bouton radio coché et le cacher sinon

Bonsoir

il faut mettre ton code dans l’événement change (OptionButton3_Change())

slts

 

[Si...]

Re : Afficher combobox lorsque bouton radio coché et le cacher sinon

Salut
à essayer en 2 temps

Private Sub OptionButton1_Change()
    ComboBox1.Visible = ad         'ad = cellule liée au bouton d'option
End Sub

Private Sub ComboBox1_GotFocus()
    MsgBox "mettre en place le travail à faire", vbInformation, "ici,"
    'pour finir, remettre l'option à false
    ad = False                     'ad = cellule liée au bouton d'option
End Sub

 

[Ark30]

Re : Afficher combobox lorsque bouton radio coché et le cacher sinon

Merci les gars!
@+

 

[Si...]

Re : Afficher combobox lorsque bouton radio coché et le cacher sinon

salut

comme tu le dis Si... bien

Si... pourquoi passer par une cellule sauf si initialisation de l'OptionButton da,ns certaines conditions ...

sans cela, le bouton n'est plus utile et il y a peut-être mieux à faire; mais sans le contexte ...

...
Arf tout simplement et en une seule ligne de code [/code]

dans ce cas, je me contente de :

Private Sub OptionButton3_Change()
  ComboBox1.Visible =  OptionButton3
End Sub

 

[Pierrot93]

Re : Afficher combobox lorsque bouton radio coché et le cacher sinon

Bonjour à tous,

même question ici apparement, le même principe devrait s'appliquer... ou alors donner plus de détails...

bonne journée
@+