Public Sub CAsso_KeyDown(ByVal CAsso As Object, ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
RaiseEvent KeyDown(CAsso, KeyCode, Shift)
' Si l'UserForm utilise un ComboBoxLiées nommé CLs, Conseil: CLs.ToucheAppuyée KeyCode (Pour détection CLs.ChangéÀLEchap)
End Sub