Discussion :

[INFINITY100]

Bonsoir à tous

Voila je cherche à traduire en VBA ces deux formules une c'est matricielle et l'autre une formule simple

pour la matricielle c'est :

=SIERREUR(MOYENNE(SI(($C$20:$C$1048576="Entrée");$F$20:$F$1048576));"-")

et la simple c'est :

=SIERREUR(SOMME.SI($C$20:$C$1048576;"Entrée";$G$20:$G$1048576)+SOMME.SI($C$20:$C$1048576;"Annulation";$G$20:$G$1048576);"-")

Merci à vous tous par avance

Cordialement

[Promethee25]

Bonjour,

Si c'est pour mettre dans une cellule, il faut utiliser la propriété FormulaArray de l'objet Range (avec la formule en anglais).

[eriiic]

Bonjour,

Il faut aussi doubler les " internes pour que vba l'interprète comme un caractère de la formule et non comme fin de chaine (et de la formule).

Tu peux aussi laisser la formule en français avec .formulaLocal :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

[A1].FormulaLocal = "=SIERREUR(MOYENNE(SI(($C$20:$C$1048576=""Entrée"");$F$20:$F$1048576));""-"")"

Ce qui n'existe pas pour les formules matricielles (FormulaArrayLocal n'existe pas).
Mais tu peux la mettre en français, et ensuite la valider en matriciel avec :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

[A1].FormulaArray = [A1].Formula

Autre façon : inscrire ta formule dans un nom (dans un nom elle sera toujours matricielle) et mettre =ton_nom en formule dans ta cellule.

eric