XL 2016 Bloquer un Commandbutton avec plusieurs textbox ou Optionbutton

[Goose]

Bonjour à tous,
suivant le code ci-dessous comment intégrer en plus de la textbox "TB_Nom", la textbox "TB_Prenom" et Optionbutton "OB_phone" ?

Private Sub TB_Nom_Change()
'bloquer bouton Valider
If TB_Nom <> "" Then
CommandButton1.Enabled = True
Else
CommandButton1.Enabled = False
End If
End Sub

Merci d'avance
Slts

 

[Jacky67]

Bonjour à tous,
suivant le code ci-dessous comment intégrer en plus de la textbox "TB_Nom", la textbox "TB_Prenom" et Optionbutton "OB_phone" ?

Private Sub TB_Nom_Change()
'bloquer bouton Valider
If TB_Nom <> "" Then
CommandButton1.Enabled = True
Else
CommandButton1.Enabled = False
End If
End Sub

Merci d'avance
Slts

Bonjour,
Ce ne serait pas plutôt quelque chose comme ceci

Private Sub TB_Nom_Change()
'débloquer
Me.CommandButton1.Enabled = TB_Nom <> ""
Me.TB_Prenom.Enabled = TB_Nom <> ""
Me.OB_phone.Enabled = TB_Nom <> ""
End Sub
'-----------------------------------------------------------------
Private Sub UserForm_Initialize()
'bloquer sauf me.TB_Nom
    Me.CommandButton1.Enabled = False
    Me.TB_Prenom.Enabled = False
    Me.OB_phone.Enabled = False
End Sub

Sinon mettre un classeur avec l'userform en PJ

 

[Goose]

Ok merci je regarde ça est te dit !!
bye