Re,
briatexte a écrit :
Pour l'instant ma formule est en anglais car j'ai compris que la macro n'execute que les formules en anglais (ou je me trompe)
Pas vraiment. En VBA, tu peux écrire une formule aussi en français en utilisant la propriété "FormulaLocal". Il suffit de connaître la syntaxe.
Pour avoir la formule et ainsi le résultat :
[J10].FormulaLocal = "=SI(ESTERR(MOYENNE(J3:J9));"""";MOYENNE(J3:J9))"
Pour avoir uniquement le résultat :
On Error Resume Next
[J10] = WorksheetFunction.Average(Range("J3:J9"))
NB : j'ai choisi d'afficher le résultat dans la cellule J10, il faut l'adapter selon ton besoin