Selection en boucle dans une combobox

Bonsoir,


num = .Range("A65536").End(xlUp).Row + 1 'on part du bas de la colonne

If ComboBox5.Value = Choix1 Then
.Range("A" & num).Value = ComboBox2.Value
If TextBox10.Value = "" Then
MsgBox ("Quantité vaisselle non entrée")
.Range("A" & num).Value = 0
Exit Sub
Else
If CInt(TextBox10.Value) > CInt(TextBox9.Value) Then
MsgBox ("Quantité vaisselle supérieure au stock")
.Range("A" & num).Value = " "
TextBox10.Value = " "
Exit Sub
End If
End If
.Range("A" & num).Value = ComboBox2.Value
.Range("b" & num).Value = TextBox10.Value
TextBox19 = n * TextBox11.Value
.Range("c" & num).Value = TextBox19.Value
TextBox15 = CSng(TextBox15) + CSng(TextBox19)

avec le code ci-dessus et le bouton CommandButton_Click je ne peux sélectionner qu'une valeur de ma combobox2 et je ne peux pas reitérer une nouvelle sélection.en fait je voudrais pouvoir sélectionner une valeur de ma combobox2 entrer une valeur dans la textbox correspondante appuyer sur "enter" pour copier les données dans ma feuille et pourvoir répéter l'opération avec une nouvelle valeur de ma combobox2 comme une boucle
pouvez vous m'aider

merci