[-RESOLUTO-]Confirmation de la recherche dans un TextBox

[Ilino]

Bonsoir Forum
Je souhaite chercher une valeur dans la colonne C de la feuille "Contrats" via un TextBox1 d’un USF et afficher la confirmation de la recherche dans un TextBox2.
Example:
Si la valeur saisie dans le TextBox1 existe dans la colonne C de la feuille "Contrats"
alors afficher dans le TextBox2 : Contrat existe
si non : Contrat non inscrit
GRAZIE

 

[Ilino]

Re : Confirmation de la recherche dans un TextBox

Bonsoir Forum et Bon début de semaine
est ce que mon souci est clair??
GRAZIE

 

[job75]

Re : Confirmation de la recherche dans un TextBox

Bonjour Ilino,

Private Sub TextBox1_Change()
TextBox2 = "Contrat " & IIf(Application.CountIf(Range("C2:C" & Rows.Count), TextBox1), "existe", "non inscrit")
End Sub

ou :

Private Sub TextBox1_Change()
With Sheets("Contrats")
TextBox2 = "Contrat " & IIf(Application.CountIf(.Range("C2:C" & .Rows.Count), TextBox1), "existe", "non inscrit")
End With
End Sub

Assez élémentaire non ?

Bonne journée.

 

[Ilino]

Re : Confirmation de la recherche dans un TextBox

Bonjour MAITRE
oUI Merci pour la réponse, mais si le TextBox1 est vide il s'afiche dans le TextBox2 Contrat existe ??
Grazie maitre

 

[Ilino]

Re : Confirmation de la recherche dans un TextBox

Bonjour Ilino,

Private Sub TextBox1_Change()
TextBox2 = "Contrat " & IIf(Application.CountIf(Range("C2:C" & Rows.Count), TextBox1), "existe", "non inscrit")
End Sub

ou :

Private Sub TextBox1_Change()
With Sheets("Contrats")
TextBox2 = "Contrat " & IIf(Application.CountIf(.Range("C2:C" & .Rows.Count), TextBox1), "existe", "non inscrit")
End With
End Sub

Assez élémentaire non ?

Bonne journée.

Re
si tu permet j'ai ajouter a ton code (2eme) le code suivant : If TextBox1.Value = "" Then TextBox2.Value = ""

Private Sub TextBox1_Change()
With Sheets("Contrats")
TextBox2 = "Contrat " & IIf(Application.CountIf(.Range("C2:C" & .Rows.Count), TextBox1), "existe", "non inscrit")
If TextBox1.Value = "" Then TextBox2.Value = ""
End With
End Sub

Assez élémentaire non ?
GRAZIE MAITRE
PBLM RESOLUTO

 

[job75]

Re : Confirmation de la recherche dans un TextBox

Re,

mais si le TextBox1 est vide il s'afiche dans le TextBox2 Contrat existe ??

Tu dois être capable de faire ce qu'il faut [Edit] eh oui, tu l'as fait, mais enlève les .Value totalement inutiles.

A+