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 177
Messages
2 085 972
Membres
103 073
dernier inscrit
MSCHOE16