Combobox sans valeur

[Geraldine]

Bonjour,

J'ai un petit souci tout bete, concernant les Combobox dans une userform.
Je veux envoyer la valeur de la combobox1 dans la cellule H19 et de la combobox2 dans la cellule I19, ça c'est ok.
Mais le problème si la combobox1 n'as aucune selection, donc vide, et que je valide pour confirmer la combobox2, dans mes cellules I19 j'ai bien la valeur de la combobx2 mais dans la cellule H19 j'ai rien
oui mais je ne peux pas utiliser formule =si(H19="" ou H19>0 etc ... parce en fait il y a quand meme quelque chose >>> un vide mais pas rien. Donc je veux tout simplement dire que si combobox1 pas de selection et bein tu ne fait aucune action.

Mon code
Private Sub Valider_Click()
[H19] = UserForm1.ComboBox1 & " "
[I19] = UserForm1.ComboBox2 & " "
Unload UserForm1
End Sub

Merci à vous, Géraldine

 

[Orodreth]

Re : Combobox sans valeur

Bonjour Geraldine

Essaye ça:

Private Sub Valider_Click()
If UserForm1.combobox1.value <> "" then [H19] = UserForm1.ComboBox1 & " "
If UserForm1.combobox2.value <> "" then [I19] = UserForm1.ComboBox2 & " "
Unload UserForm1
End Sub

Cordialement,
Thomas

 

[Geraldine]

Re : Combobox sans valeur

re
c'etait si simple, merci a toi Orodreth

Cordialement, géraldine

 

[Orodreth]

Re : Combobox sans valeur

Je t'en prie

Thomas