XL 2019 Code VBA / Formulaire, condition multiple case grisée

[DUPONTMARION]

Bonjour,

Je n'arrive pas à coder dans un userform un bouton "valider" qui se dégrise uniquement si plusieurs champs sont complétés

Ce code ci-dessous fonctionne, cependant, je souhaite que le bouton "validé" se dégrise uniquement si plusieurs champs sont complétés, dans mon exemple ci-dessous uniquement la saisie de la TextBox1 permet de valider le formulaire or,
Je voudrais que le formulaire puisse être "validé" uniquement si plusieurs textBox soient saisies"TextBox3 / TextBox2 / TextBox24 etc.

Private Sub TextBox1_Change()
If TextBox1 <> "" Then
CommandButton2.Enabled = True
Else
CommandButton2.Enabled = False
End If


Merci par avance,

Marion

 

[JM27]

bonjour
Private Sub TextBox1_Change()
If TextBox1 <> "" and TextBox2 <> ""and TextBox3 <> "" Then
CommandButton2.Enabled = True
Else
CommandButton2.Enabled = False
End If

Idem pour les deux autre textbox

 

[DUPONTMARION]

bonjour
Private Sub TextBox1_Change()
If TextBox1 <> "" and TextBox2 <> ""and TextBox3 <> "" Then
CommandButton2.Enabled = True
Else
CommandButton2.Enabled = False
End If

Idem pour les deux autre textbox

Merci beaucoup, je note comme résolue car il s'agit de la solution, cependant, ça ne fonctionne pas, lorsque je teste, le formulaire ne se déverrouille plus. J'ai du louper quelque chose

 

[JM27]

Bonjour
ci joint ta solution
et pourtant j'avais ecris

Idem pour les deux autre textbox

Pour info : je vois mal le but ; mais c'est toi qui vois

Par contre si tu dois tester l'ensemble des textbox, ce n'est pas comme cela qu'il faut faire