VLookup (ou RechercheV mais en VBA)
Dans le feuille "Lst", j'ai deux tableaux, le premier en H4:H14, le second en J4:J14, soit NoColonne + 2
Si j'utilise le code suivant
Code:
1 2
| TextBox5 = WorksheetFunction.VLookup(CDbl(CDate(Rec.Cells(NoLig, 5))), _
Lst.Range("H4:H14"), 1, False) |
... le code fonctionne mais me trouve la valeur cherchée, évidemment (!)
Alors je mets la colonne de la valeur que je souhaite afficher...
Code:
1 2
| TextBox5 = WorksheetFunction.VLookup(CDbl(CDate(Rec.Cells(NoLig, 5))), _
Lst.Range("H4:H14"), 3, False) |
... j'ai alors l'erreur "Impossible de lire la propriété VLookup de la classe WorksheetFunction."
Comme j'ai également des données sur la colonne I, je teste avec 2 : Même punition.
J'ai testé :
- en supprimant l'instance de la feuille
- en remplaçant valeurs et adresses par des variables
- en ressaisissant les dates
- avec False
- sans False
- en ajoutant Application à WorksheetFunction
- en l'enlevant...
- ... etc.
Deux heures que je teste ! :cry:
Quand VLookup cherche la donnée sur la même colonne que celle sur laquelle se trouve la valeur fournie, ça fonctionne dans tous les cas de figures.
Donc, il la trouve ! :evil:
Quand je lui demande de chercher "ailleurs" : Erreur ! :furax:
Donc... si quelqu'un sait quelque chose que j'ignore, alors qu'il le dise ! Zut ! M...de ! Quoi ! :evilred:
Un grand merci d'avance au dépanneur ! :lol: