Valeur dans TextBox1 après recherche dans une autre TextBox

Bonjour,

Je suis à la recherche de: comment afficher la valeur de la colonne C dans une TextBox après avoir chercher une valeur dans le tableau

J'ai cette userform:

Dans la TextBox je cherche une valeur d'un numéro de tracking qui est entre les colle D à AB

Pour la recherche j'ai déjà ça:

Feuil1.Activate
Feuil1.Select

    Range("A1").Select
    Cells.Find(What:=RecommandeBox.Value, After:=ActiveCell, LookIn:=xlValues, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
        

Et suivant la ligne oú est situé ce numéro, je veux que dans la TextBox1 s'affiche la valeur de la colonne C

J'éspère que c'est compréhensible.

Merci d'avance du coup de main

bonjour peu_foyer,

Un code à adapter avec tes variables :

Sub peu_foyer()

Dim cellule As String
Dim ValeurCherchee As String
Dim Tableau() As String
Dim i As Integer

    ValeurCherchee = "Test4" ' la valeur rechercher
    cellule = Cells.Find(ValeurCherchee).Address
    Tableau = Split(cellule, "$")

    ValeurTrouvee = Range("B" & Tableau(2)).Value
    MsgBox ValeurTrouvee

End Sub

Le fichier en exemple,

Bon courage

Merci, mais ça n'affiche pas la valeur de la colonne C dans la TextBox

Une fois que j'ai trouver la valeur, je voudrais que dans la textbox soit afficher la valeur de la colonne C de la même ligne.

Désolé erreur d'inattention de ma part. il faut remplacer

ValeurTrouvee = Range("B" & Tableau(2)).Value

Par

ValeurTrouvee = Range("C" & Tableau(2)).Value

J'ai essayé en plaçant la valeur dans la colonne "C", j'ai la valeur qui s'affiche dans la MsgBox.

bien cdlt,

Merci ça fonctionne comme je veux.

Sauf qu'au lieu que ça s'affiche dans une MsgBox, j'ai remplacé MsgBox par TextBox1 et c'est nickel.

Grand Merci