Tester l'existance d'une valeur via compobox

Bonjour

ça doit étre trés facile pour vous je voudrais envoyer une msgbox si le ID tapé sur ma barre de recherche n'existe pas

avez vous une idée s'il vous plait ,

en PJ mon simple fichier

merci d'avance

Bonsoir,

un essai.

Cordialement.

Bonsoir DamienRRRR, le forum,

Pourquoi te disperses-tu autant ?

Pourquoi tous ces posts ?

Je t'avais apporté un début de réponse ici https://forum.excel-pratique.com/viewtopic.php?p=833402#p833402

mais la solution proposée n'a pas semblé te convenir, puisque aucune réponse

Private Sub CommandButton3_Click()       ' aller à

    Dim no_ligne As Integer

    If Application.CountIf(Range("B:B"), ComboBox1) Then
        no_ligne = ComboBox1.ListIndex + 5
         TextBox1.Value = Cells(no_ligne, 2)
         TextBox2.Value = Cells(no_ligne, 3)
         TextBox3.Value = Cells(no_ligne, 4)
    Else
     MsgBox "ID inconnu": Exit Sub
    End If
End Sub

Tu risques de décourager les membres du forum à te venir en aide.....

Cordialement,

bigdaddy154 a écrit :

Bonsoir,

un essai.

Cordialement.

Salut, je te remercie, ça marche nickel

xorsankukai a écrit :

Bonsoir DamienRRRR, le forum,

Pourquoi te disperses-tu autant ?

Pourquoi tous ces posts ?

Je t'avais apporté un début de réponse ici https://forum.excel-pratique.com/viewtopic.php?p=833402#p833402

mais la solution proposée n'a pas semblé te convenir, puisque aucune réponse

Private Sub CommandButton3_Click()       ' aller à

    Dim no_ligne As Integer

    If Application.CountIf(Range("B:B"), ComboBox1) Then
        no_ligne = ComboBox1.ListIndex + 5
         TextBox1.Value = Cells(no_ligne, 2)
         TextBox2.Value = Cells(no_ligne, 3)
         TextBox3.Value = Cells(no_ligne, 4)
    Else
     MsgBox "ID inconnu": Exit Sub
    End If
End Sub

Tu risques de décourager les membres du forum à te venir en aide.....

Cordialement,

je te remercie, ça marche bien ton code, je suis désolé, je suis encore débutant sur VBA et je suis en mode apprentissage

Re,

Merci pour ton retour,

je te remercie, ça marche bien ton code, je suis désolé, je suis encore débutant sur VBA et je suis en mode apprentissage

Pas de souci , je ne suis pas non plus un pro,

Ce que j'essayais de te faire comprendre, c'est qu'il faut tester les propositions qui te sont apportées, essayer de les comprendre et de les adapter avant de passer à l'étape suivante....tu avais 3 posts en cours et j'avais du mal à te suivre...

Bonne continuation

A bientôt,

xorsankukai a écrit :

Re,

Merci pour ton retour,

je te remercie, ça marche bien ton code, je suis désolé, je suis encore débutant sur VBA et je suis en mode apprentissage

Pas de souci , je ne suis pas non plus un pro,

Ce que j'essayais de te faire comprendre, c'est qu'il faut tester les propositions qui te sont apportées, essayer de les comprendre et de les adapter avant de passer à l'étape suivante....tu avais 3 posts en cours et j'avais du mal à te suivre...

Bonne continuation

A bientôt,

Je te remercie, en faite pourquoi j'avais 3 postes en meme temps car j'ai decoupé mon code pour vous simplifier la lecture, je voulais pas partager un fichier avec 100 ligne de codes