XL 2010 Fusionner un bouton Valider pour 2 Combobox dans un Userform

Bonjour

Dans l'Userform j'ai 2 Combobox (1 => IN & 1 => OUT)

Pour valider les données j'ai crée un bouton par combobox, comment utiliser SVP la même bouton pour le 2 Combobox?

Private Sub CommandButton5_Click() 'Private Sub Valider_Click()
With ActiveSheet
ligne = .Range("A65635").End(xlUp).Row + 1
.Cells(ligne, 1).Value = Me.ComboBox1
lblmessage2 = "Transfert effectué"
End With
EffaceTout
ComboBox1.SetFocus
[A65789].End(xlUp).Offset(1, 0).Select
End Sub

Private Sub CommandButton11_Click() 'Private Sub Valider_Click()
With ActiveSheet
ligne = .Range("A65635").End(xlUp).Row + 1
.Cells(ligne, 1).Value = Me.ComboBox2
lblmessage2 = "Transfert effectué"
End With
EffaceTout
ComboBox2.SetFocus
[A65789].End(xlUp).Offset(1, 0).Select
End Sub

Cordialement