' 'Ajout 2023
' E = 2
' cquoi = Application.VLookup (ComboBox1, range(Sheets("DB").cells("U:W"), E, False)
' .Range("L" & L).Value = cquoi
' 'E = E + 1
' '.Range("M" & L).Value = Application.WorksheetFunction.VLookup (ComboBox1, ThisWorkbook.Sheets("DB").Range("U:W"), E, False)
' 'fin ajout 2023