Discussion :

[jackborogar]

Bonjour à tous,

Après plusieurs forums et plusieurs essais je n'arrive pas à coder cette fonction en VBA :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

{=INDEX(Feuil3!$D$30:$D$54;EQUIV(C13&AH13&Y13;Feuil3!$A$30:$A$54&Feuil3!$B$30:$B$54&Feuil3!$C$30:$C$54;0))}

J'ai utilisé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
With Sheets("Listing")
 
    .Cells(recordnumber, 26).FormulaArray = "=INDEX(Feuil3!$D$30:$D$54;MATCH(C" & recordnumber & "&AH" & recordnumber & "&Y" & recordnumber & ";Feuil3!$A$30:$A$54&Feuil3!$B$30:$B$54&Feuil3!$C$30:$C$54;0))"
 
End with

Sans succès.

Quelqu'un aurait-il une voie d'exploration?

En vous remerciant,

Tanguy

[joe.levrai]

Bonjour,

sépare les arguments de ta fonction par une virgule au lieu d'un point virgule, puisqu'il faut écrire en format US

[jackborogar]

Le week end a été dur...

Merci

[BENNASR]

bonjour
je sais pas si ma réponse est pertinent mais dans ton cas et si l'insertion manuel de la formule donne résultat dans ce cas je met le curseur avant la formule , je démarre l'enregistreur automatique, je glisse avec le souris en bas et puis j'adapte

[cerede2000]

En cas de doute sur la traduction d'une formule pour la mettre via VBA tu peux utiliser ce site qui est super pratique
http://fr.excel-translator.de/translator/

[Marc-L]

Bonjour, bonjour !

Pas besoin d'aller sur un site pour traduire une formule Excel en VBA ‼

Sélectionner la cellule puis dans le VBE ouvrir la fenêtre Exécution et y valider ?activecell.formulaarray …
Il y a juste à doubler les guillemets si présents dans la formule.
Tout cela est du reste précisé dans un tutoriel de ce forum !

Voilà, voilà !

______________________________________________________________________________________________________
Je suis Paris, Charlie, Bruxelles, …