Recherche V

Bonjour,

j'ai envie que dès que je tape mon identifiant dans ma textbox cela me donne automatiquement le nom dans ma 2e textbox, sachant que les identifiants et les noms sont référencés dans l'onglet parametrage. Je vous joins mon fichier.

Cordialement;

Hello,

Essaie le fichier joint.

Super merci, ça marche très bien. J'ai essayé d'utilisé ce code:

Private Sub TextBox2_AfterUpdate()

Pour que ça s'incrémente automatiquement sans avoir de bouton mais ça ne marche pas aurais tu une solution?

Ma solution, actuellement, c'est d'aller dormir ! Je regarderai ça demain si personne ne l'a fait d'ici là

D'ailleurs, si personne ne l'a fait d'ici là, expliques ce que tu veux faire avec ton USF, pour qu'on puisse te faire un truc propre..

Bonjour,

Je vous joins mon fichier, le problème c'est que j'ai toujours besoin d'un bouton"nom" pour afficher le nom et lorsque j’appuie sur le bouton "valider" le nom n'est pas reconnu alors que si je tape le nom à la main il est reconnu et va directement à l'onglet de se nom

auriez-vous une solution?

merci,

Salut,

Essaie ça

Dim xx As String
Dim xxx As Worksheet

Private Sub CommandButton1_Click()
xx = TextBox2
Set wks = ActiveWorkbook.Worksheets(xx)

wks.Activate
UserForm1.Hide
End Sub

Private Sub CommandButton2_Click()
Dim Trouve As Range
Dim Valeur_cherchee As String
Valeur_cherchee = TextBox1.Value
    Set Trouve = Sheets("parametrage").Columns(1).Cells.Find(what:=Valeur_cherchee)
        If Trouve Is Nothing Then
            MsgBox "Pas trouvé"
        Else
            TextBox2.Value = Trouve.Offset(0, 1).Value
            End If
End Sub

Private Sub TextBox1_Change()

End Sub

Private Sub TextBox2_Change()

End Sub

Private Sub UserForm_Click()

End Sub
Private Sub UserForm_Initialize()
TextBox1 = Sheets("Feuil1").Range("B1")

End Sub

Ok, super merci pour ton aide