Bonjour à tous,

Je démarre tout juste la programmation des UserForm.

J'ai créé un formulaire avec 3 ComboBox pour qu'il injecte ces 3 données dans 3 cellules excel.

Si je sélectionne 1 seule valeur sur les 3 combobox créés, je me retrouve avec 2 cellules excel dont la valeur est écrasée par 0.

Aussi, j'aimerai faire le test suivant :

Pour chaque Combobox j'aimerai vérifier qu'il est sélectionné.

Si ce dernier n'est pas sélectionné :

- ne rien faire (c'est à dire ne pas modifier la valeur de la cellule associée)

Si ce dernier est sélectionné :

- transférer la valeur de la Comboboxe dans la cellule excel associée

Voici le script du bouton de validation :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Sub CommandButton1_Click()
 
Sheets("Feuille1").Range("A1").Value=Combobox1.Value
Sheets("Feuille1").Range("A2").Value=Combobox2.Value
Sheets("Feuille1").Range("A3").Value=Combobox3.Value
 
End Sub
J'espère avoir été clair.

Merci pour votre aide et votre indulgence.

Franck.