Bonjour,
Essaie comme cela
Private Sub ComboBox3_Change()
If Me.ComboBox2 = "Lvl 1" Then
Me.XP_Vol.Value = Application.Index(Range("XP"), Application.Match(Me.ComboBox1, Range("Lvl_Héros_XP"), 0), Application.Match(Me.ComboBox2, Range("Lvl_Jets_XP")) + Application.Match(CInt(Me.ComboBox3), Range("Temps_de_Vol1_XP"), 0) - 1)
Else
Me.XP_Vol.Value = Application.Index(Range("XP"), Application.Match(Me.ComboBox1, Range("Lvl_Héros_XP"), 0), Application.Match(Me.ComboBox2, Range("Lvl_Jets_XP")) + Application.Match(CInt(Me.ComboBox3), Range("Temps_de_Vol_XP"), 0) - 1)
End If
End Sub
A+