Modifier un label par une rechercheV

pierrejean

XLDnaute Barbatruc

• 20 Février 2013

• #2

Re : Modifier un label par une rechercheV

Bonjour Matt

Pour la RECHERCHV le terme recherché doit etre dans la 1ere colonne
Voici une solution

 

Pièces jointes

• test.xls

  37 KB · Affichages: 45
• test.xls

  37 KB · Affichages: 53
• test.xls

  37 KB · Affichages: 90

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 20 Février 2013

• #3

Re : Modifier un label par une rechercheV

Bonjour Matts, bonjour le forum,

Peut-être comme ça :

Code:

Private Sub TextBox1_AfterUpdate()
Dim r As Range

Set r = Sheets("feuil1").Range("E4:F8").Find(Me.TextBox1.Value, , xlValues, xlWhole)
If Not r Is Nothing Then
    Me.Label1.Caption = r.Offset(0, 1).Value
Else
    Me.Label1.Caption = ""
End If
End Sub

[Édition]
Bonjour PierreJean on s'est croisé...

 

Vote positif 0 Vote négatif

M

Matt51100

XLDnaute Occasionnel

• 21 Février 2013

• #4

Re : Modifier un label par une rechercheV

Bonjour à tous,

J'ai utilisé la soluce de pierrejean et après quelques bidouilles cela marche.
Une question pour ma culture perso, pourquoi ne sert t-on pas de la fonction Vlookup ?

A+

 

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 21 Février 2013

• #5

Re : Modifier un label par une rechercheV

Bonjour le fil, bonjour le forum,

J'aurais tendance à dire que c'est une question de vitesse d'exécution. Mais aussi que la Fonction VlookUp est pratique dans le tableur car elle s'actualise au recalcul. Dans ton cas, tu récupères dans un Label puis quand tu ferme l'UserForm s'est fini... Mais PierreJean te donnera peut-être d'autres arguments.

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 21 Février 2013

• #6

Re : Modifier un label par une rechercheV

Bonjour à tous

Recherchev et Vlookup, c'est pareil (l'un en Formule et l'autre en VBA).

Mais Recherchev n'est pas toujours pratique (quoique je m'en sers de plus en plus), sauf à avoir ce qu'on recherche à droite du tableau. Donc Find ou Match semble plus approprié pour rechercher n'importe quoi sur une feuille.

 

Vote positif 0 Vote négatif

M

Matt51

XLDnaute Nouveau

• 21 Février 2013

• #7

Re : Modifier un label par une rechercheV

Bonjour à tous,

Merci pour les explications et le coup de main.

A plus tard.

Matt.

 

Vote positif 0 Vote négatif