XL 2019 Erreur avec Formula

re4

XLDnaute Occasionnel
Bonjour,
Cette formule fonctionne dans une cellule
=SIERREUR(RECHERCHEV(L32;$F$3:$I$22;2;FAUX);"0"))

Mais pas celle-ci en VBA, ou fais-je l'erreur ? je ne veux pas utiliser Formula R1C1
Range("N32").Formula = "=IFERROR(VLOOKUP(L32,$F$3:$I$26,2,FALSE),""0""))"

Autre exemple qui donne comme résultat #Nom?
Range("S1").Formula = "=SUM(Cells(1, 19), Cells(100, 20))"

Merci de votre aide
 
Dernière édition:

Efgé

XLDnaute Barbatruc
Bonjour @re4
Cells est déjà un range donc Range(Cells(... ne vas pas.
Ensuite dans une formule il faut renvoyer l'adresse des cellules données par Cells(1,1).address.
Pour finir, il faut découpler le calcul de l'adresse par VBA et le texte réel de la formule.

En plus ta version de Vlookup ne vas pas.
Donne nous la formule en Français qui fonctionne dans ta feuille. On verra pour la "traduire".

Cordialement

EDIT
Un exemple de traduction :
La formule en C1 de la feuille active
VB:
=SIERREUR(RECHERCHEV($A$1;$A$1:$A$26;1;FAUX);"0")
La transposition en VBA
Code:
Cells(1, 3).Formula = "=IFERROR(VLOOKUP(" & Cells(1, 1).Address & "," & Cells(1, 1).Address & ":" & Cells(26, 1).Address & ",1,False),""0"")"
 
Dernière édition:

Statistiques des forums

Discussions
312 159
Messages
2 085 836
Membres
102 998
dernier inscrit
billABDELL