Bonjour,
j'aimerais beaucoup que quelqu'un m'aide car je ne vois pas le problème de mon code:
Private Sub TextBox2_reference_Change() 'référence pour recherchev
If TextBox2_reference.Text <> "" Then
TextBox3_days.Text = Application.VLookup(1 * TextBox2_reference, Worksheets("hidenrow").Range("A3:G26"), 3, False)
TextBox4_hours.Text = Application.VLookup(1 * TextBox2_reference, Worksheets("hidenrow").Range("A3:G26"), 4, False)
TextBox5_priceperpilot.Text = Application.VLookup(1 * TextBox2_reference, Worksheets("hidenrow").Range("A3:G26"), 5, False)
Else
TextBox3_days.Text = ""
TextBox4_hours.Text = ""
TextBox5_priceperpilot.Text = ""
End If
End Sub
merci d'avance.
