Bonjour,

Je veux insérer une formule dans une cellule et là je bloque,
il ne veut pas de cette formule où je combine par concaténation un
Iferror
à un
Average
j'ai essayé en francais avec un "FormulaR1C1Local" cf. à la place du FormulaR1C1 dans le code mais j'obtiens rien de mieux.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
LD = 7 + j * 35
LF = 32 + j * 35
col = indic_col + i * 7 + dec_colonne
calcul = "R" & LD & "C" & col & ":" & "R" & LF & "C" & col
fct = "average"
chainte_test = "= iferror(" & fct & "(" & calcul & ");0)"
.Cells(34 + j * 35, (indic_col + i * 7) + dec_colonne).FormulaR1C1 = chainte_test
Ca marchait très bien avant que je cherche à mettre le IfError.
Maintenant j'ai l'erreur :
"Erreur défini par l'application ou par l'objet"
Merci de vos idées, car je commence à sécher.