UserForm afficher Frame en fonction d'un ComboBox

[thehaker42]

Bonjour,
j'aimerais afficher un cadre et l'OptionButton qui est a l'intérieur du cadre en fonction du combo box.
Si je sélectionne la ligne 1 dans le ComboBox j'affiche Frame et OptionButton
Sinon je laisse cacher Frame et OptionButton

-Avec ce code le Cadre est toujour caché

Le but est d'ouvrir des fichiers words (només 1A, 1B, 1C, 2 et 3)

Merci

Private Sub UserForm_Activate()
    
    If ComboBox1 <> 1 Then
        Me.Frame1.Visible = False
        Me.OptionButton1.Visible = False
        Me.OptionButton2.Visible = False
        Me.OptionButton3.Visible = False
        
    Else
        Me.Frame1.Visible = True
        Me.OptionButton1.Visible = True
        Me.OptionButton2.Visible = True
        Me.OptionButton3.Visible = True
    End If

End Sub

Regarde la pièce jointe userform.xls

 

[thehaker42]

Re : UserForm afficher Frame en fonction d'un ComboBox

merci 🙂
j'ai meme amélioré
rendant invisible le cadre tant que la ligne 1 n'est pas sélectionné

Private Sub UserForm_Activate()
    
        Me.Frame1.Visible = False
        Me.OptionButton1.Visible = False
        Me.OptionButton2.Visible = False
        Me.OptionButton3.Visible = False
End Sub

Private Sub combobox1_change()
    
    If ComboBox1 <> 1 Then
        Me.Frame1.Visible = False
        Me.OptionButton1.Visible = False
        Me.OptionButton2.Visible = False
        Me.OptionButton3.Visible = False
        
    Else
        Me.Frame1.Visible = True
        Me.OptionButton1.Visible = True
        Me.OptionButton2.Visible = True
        Me.OptionButton3.Visible = True
    End If

End Sub

 

[thehaker42]

Re : UserForm afficher Frame en fonction d'un ComboBox

ah ouai oO impressionnant ça simplifie grandement le code
merci beaucoup, j'ai encore pas mal de chose à apprendre ^^