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