Bonjour à tous,
Je cherche à compléter un TextBox3 une fois un TextBox1 & ComboBox1 renseigné et qui ira donc chercher une valeur dans un Tableau suivant 2 conditions...
Je coince sur mon code qui est le suivant et qui ne renvoi pas d'erreur mais n'affiche rien...
Private Sub TextBox3_Change()
If ComboBox1.Value = "" Then
TextBox3.Value = ""
Else
TextBox3.Value = CDbl(Application.Index(H_Fin, Match(1, (TextBox1.Value = Suivi_Date) * (ComboBox1.Value = ID_Engin), 0), 1))
End If
End Sub
A votre bon cœur et courage en cette période de confinement!!
Alex
Je cherche à compléter un TextBox3 une fois un TextBox1 & ComboBox1 renseigné et qui ira donc chercher une valeur dans un Tableau suivant 2 conditions...
Je coince sur mon code qui est le suivant et qui ne renvoi pas d'erreur mais n'affiche rien...
Private Sub TextBox3_Change()
If ComboBox1.Value = "" Then
TextBox3.Value = ""
Else
TextBox3.Value = CDbl(Application.Index(H_Fin, Match(1, (TextBox1.Value = Suivi_Date) * (ComboBox1.Value = ID_Engin), 0), 1))
End If
End Sub
A votre bon cœur et courage en cette période de confinement!!
Alex