Microsoft 365 ( Résolu ) TextBox2 rempli par rapport à TextBox1

Le Rouky

XLDnaute Nouveau
Le forum,

Encore moi,

j'essai de rechercher la valeur de TextBox1 dans la Colonne "A" de la Feuille "Test" et de mettre la valeur de la Colonne "C" de cette ligne dans le TextBox2.
(Pour info : il n'y a pas de doublon en Colonne"A")

auriez vous une idée ?

cordialement
 
Solution
Bonsoir le fil, bonsoir le forum,

Essaie comme ça :

VB:
Dim CEL As Range

Set CEL = Worksheets("Test").Columns(1).Find(Me.TextBox1.Value, , xlValues, xlWhole)
If Not CEL Is Nothing Then TextBox2.Value = CEL.Offset(0, 2).Value

Mais surtout essaie de comprendre le principe...

Robert

XLDnaute Barbatruc
Repose en paix
Bonsoir le fil, bonsoir le forum,

Essaie comme ça :

VB:
Dim CEL As Range

Set CEL = Worksheets("Test").Columns(1).Find(Me.TextBox1.Value, , xlValues, xlWhole)
If Not CEL Is Nothing Then TextBox2.Value = CEL.Offset(0, 2).Value

Mais surtout essaie de comprendre le principe...
 

Eric C

XLDnaute Barbatruc
Re le fil

@Le Rouky. Je ne m'inquiète pas.. ce que j'en disais... c'est pour l'utilisateur.
Il et inutile de mentionner dans ton titre que ton post est résolu. Il te faut te positionner sur le post de notre ami Robert et de cocher "solutionné" dans le cartouche gauche.
@+ Eric c
Résolu.png
 

Discussions similaires

Réponses
22
Affichages
689
Réponses
8
Affichages
404

Statistiques des forums

Discussions
311 718
Messages
2 081 866
Membres
101 827
dernier inscrit
kubinou