Fonction vlookup sur un fichier fermé

Bonjour et merci d'avance pour votre précieuse aide,

J'ai le code ci-dessous qui me servirait à extraire dans un fichier fermé une information que je mettrais en Msgbox.

Mais çà ne fonctionne pas

il met : Erreur d'execution '13':

Incompatibilité de type

Quelqu'un pourrait me dépanner dans la bonne syntaxe ?

Merci bcp

Chree

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("i2:i25000")) Is Nothing Then
result = Application.VLookup(Target.Offset(0, 0).Value, "'S:\Book AM\SECTEUR_POLISSAGE\3 GESTION PRODUCTION\Suivi_Production\[Consignes.xlsx]Consigne'!B:O", 5, False)
MsgBox result

End If
End Sub

Bonjour,

la syntaxe semble correcte; tu peux recevoir ce message d'erreur, si la fonction retourne une erreur

par exemple

fichier non trouvé

valeur non trouvée

Bonjour,

Merci d'avoir pris le temps de répondre.

La fonction VLOOKUP nécessite que le fichier lié soit IMPÉRATIVEMENT ouvert préalablement.

Donc je l'ouvre avec une ligne de code avant de tester la fonction VLOOKUP.

Chree