Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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:
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…