Private Sub Cbx_name_GotFocus()
{Code éventuel pour construire la <Tableau ou Range des valeurs>}
Call ComboBoxEnter(Me.Cbx_name, <Tableau ou Range des valeurs>)
End Sub
Private Sub Cbx_name_Change()
Call ComboBoxChange(Me.Cbx_name)
End Sub
Private Sub Cbx_o_name_GotFocus()
{Code éventuel pour construire la <Tableau ou Range des valeurs>}
Call ComboBoxEnter(Me.Cbx_o_name, <Tableau ou Range des valeurs>)
End Sub
Private Sub Cbx_o_name_Change()
Call ComboBoxChange(Me.Cbx_o_name)
End Sub