Transposé une formule du tableur EXCEL en VBA

Bonjour, je n'arrive pas à passer d'une fonction que j'ai rédigé sur l'interface graphique à une fonction rédigé en VBA.

La fonction est la suivante :

=SIERREUR(SI(RECHERCHEV($A$29;B565.csv!$A$2:$N$217;5;FAUX)<>0;RECHERCHEV($A$29;B565.csv!A$2:$N$217;5;FAUX);SI(RECHERCHEV($A29;B565.csv!$A$2:$N$217;6;FAUX)<>0;RECHERCHEV($A29;B565.csv!$A$2:$N$217;6;FAUX);0));"")

Pourriez-vous m'envoyer le code VBA que je dois écrire pour obtenir le résultat de ma fonction dans une variable ?

A l'aide ! :calim2: et merci d'avance

Bonjour,

En utilisant "FormulaLocal"

Code:

---

.FormulaLocal = "=SIERREUR(SI(RECHERCHEV($A$29;B565.csv!$A$2:$N$217;5;FAUX)<>0;RECHERCHEV($A$29;B565.csv!A$2:$N$217;5;FAUX);SI(RECHERCHEV($A29;B565.csv!$A$2:$N$217;6;FAUX)<>0;RECHERCHEV($A29;B565.csv!$A$2:$N$217;6;FAUX);0));"""")"

---

A+

Merci,

Ca parait si simple quand on a la solution.
Tu as refais ma journée !