Ajout d'un message lors d'une recherche

Bonjour,

Donc voila j'ai une petite base de données que je voudrais améliorer.

C'est une base de données avec 3 colonnes qui donne des informations par report a un code.

Je voudrais ajouter un petit message (par exemple: " Ce code n'est pas présent dans la base de données veuillez l'ajouter svp), lorsque je fais une recherche et que le code n'existe pas encore.. je ne sais pas si c'est possible..

Pour le moment lorsque je tape un code non existant dans recherche , il m'affiche les noms des colonnes..

Il y a déjà un message de confirmation lors de l'ajout d'un nouveau code, mais je n'arrive pas pour le message dans la recherche..

Voila , merci d'avance

Et si vous voyez un amélioration a faire n’hésitez pas.

Bonne soirée a vous.

Bonsoir Boule123

une façon parmis d'autres

Etant donné que les codes font partis de la combobox, tu peux tester si le matchfound est vrai ou faut et sortir de la macro

Private Sub CommandButton3_Click()
Sheets(1).Select
Dim no_ligne As Integer
no_ligne = ComboBox1.ListIndex + 2

If Me.ComboBox1 <> "" And Me.ComboBox1.MatchFound = False Then MsgBox "Ce code n'est pas présent dans la base de données veuillez l'ajouter svp", vbOKOnly + vbInformation, "Recherche infructueuse": Exit Sub
If ComboBox1.Value = "" Then
   MsgBox ("Veuillez remplir le champs de recherche, puis réessayer!")
Else
   TextBox2.Value = Cells(no_ligne, 2).Value
   TextBox3.Value = Cells(no_ligne, 2).Value
End If
End Sub

Parfait ! un grand merci

Rechercher des sujets similaires à "ajout message lors recherche"