Vlookup (target, fichier, 2, false....) problème de paramètre

tibtelcom

XLDnaute Nouveau
j'ai une macro qui compare le texte saisi en colonne A et va chercher ce qui lui correspond dans un autre fichier à l'aide de vlookup. (merci Youki)
Chemin1 = "X:\communication_interne\gestion_temps\Références classées avn.xls"

If Dir(Chemin1) <> "" Then

fichier = "'C:\[bd1.xls]Feuil1'!$A$1:$B$65000"

Application.EnableEvents = False

Target.Offset(, 1).Formula = "=VLOOKUP(" & Target & "," & fichier & ",2,FALSE)"
MsgBox Target.Offset(, 1).Formula
If Application.IsNA(Target.Offset(, 1)) Then _
MsgBox "Nom inconnu": Target.Offset(, 1) = "": Target.Select
Target.Offset(, 1).Value = Target.Offset(, 1).Value

mon problème est que lorsque la donnée saisie comporte une lettre, elle devient du texte et non un nombre et je ne sais pas pourquoi mais ce code ne fonctionne plus.
il faudrait, je pense, changer l'architecture de la ligne
Target.Offset(, 1).Formula = "=VLOOKUP(" & Target & "," & fichier & ",2,FALSE)"
qu'en pensez-vous ?
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 668
Messages
2 090 739
Membres
104 643
dernier inscrit
adriano22