Convertir formule 'index, equiv' en VBA

Bonjour à vous,

Après plusieurs recherche et tentative, je n'y arrive pas...
Je fais appel à votre aide pour convertir cette formule

C'est une formule index + equiv qui va chercher la réponse dans un fichier externe

=INDEX('\\fs-cl2\VOL3\repertoire\[fichier.xlsm]INVENTAIRE'!$J$4:$J$5000;EQUIV(D2;'\\fs-cl2\repertoire\[fichier.xlsm]INVENTAIRE'!$A$4:$A$5000;0)))

Bonjour,

Tu te mets sur ta cellule, tu mets en route l'enregistreur de macro, tu appuies sur F2 pour rentrer dans ta cellule (ou tu doubles clic dedans), puis tu fais ENTER.

Tu peux couper l'enregistreur de macro et tu as normalement la formule à écrire traduite en VBA.

Edit : Je crois que ce n'est pas ce que tu veux en fait.

Bon matin Joyeux Noel

J'ai essayé de créer une macro avec l'enregistreur et la formule qui fonctionne bien....
Résultat un code qui ne fonctionne pas :(