Bonjour à tous,
Pourriez-vous me dire pouruoi ma ComboBox est muette?
Private Sub ComboBox1_Change()
Dim def As String
If ComboBox1 <> "" Then
def = Application.VLookup(ComboBox1, Range("Lexique"), 2, 0)
With Label1
.Caption = def
.TextAlign = fmTextAlignCenter
.WordWrap = True...