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 : Sélectionner tout - Visualiser dans une fenêtre à part
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 : Sélectionner tout - Visualiser dans une fenêtre à part
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 !

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 !

Quand je lui demande de chercher "ailleurs" : Erreur !

Donc... si quelqu'un sait quelque chose que j'ignore, alors qu'il le dise ! Zut ! M...de ! Quoi !

Un grand merci d'avance au dépanneur !