Calculer une moyenne par VBA
freeycap
Messages postés
87
Statut
Membre
-
freeycap Messages postés 87 Statut Membre -
freeycap Messages postés 87 Statut Membre -
Bonjour,
J'aimerai programmé avec vba des moyennes apparaissant sur une colonne (disons mon RangeA). Quelques fois, il n'y a aucune valeur sur certaines cellules de la colonne. Sans vba, je peux écrire ceci :
=SI(NBVAL(RangeA)=0;"";MOYENNE(RangeA))
Ca fait ma moyenne sans tenir compte des cellules vides.
Ca peut se traduire comment en vba ?
Merci d'avance
J'aimerai programmé avec vba des moyennes apparaissant sur une colonne (disons mon RangeA). Quelques fois, il n'y a aucune valeur sur certaines cellules de la colonne. Sans vba, je peux écrire ceci :
=SI(NBVAL(RangeA)=0;"";MOYENNE(RangeA))
Ca fait ma moyenne sans tenir compte des cellules vides.
Ca peut se traduire comment en vba ?
Merci d'avance
A voir également:
- Calcul moyenne vba
- Comment calculer la moyenne sur excel - Guide
- Calcul km marche à pied gratuit - Télécharger - Sport
- Calcul charpente bois gratuit - Télécharger - Architecture & Déco
- Moyenne en anglais excel - Guide
- Logiciel gratuit calcul valeur nutritionnelle - Télécharger - Santé & Bien-être
4 réponses
J'avais mal compris :
Si tu veux faire une moyenne en excluant les zéros/cellules vides :
1f u c4n r34d th1s u r34lly n33d t0 g37 l41d !
Si tu veux faire une moyenne en excluant les zéros/cellules vides :
=SOMME(PLAGE)/(NB(PLAGE)-NB.SI(PLAGE;"=0"))
1f u c4n r34d th1s u r34lly n33d t0 g37 l41d !
Bonsoir,
Pourquoi as tu écrit cette formule
=SI(NBVAL(RangeA)=0;"";MOYENNE(RangeA))
si c'est pour gérer l'erreur dans le cas de cellule vide depuis Excel 2007 tu peux écrire
=SIERREUR(MOYENNE(A2:A20);"")
pour une moyenne cette formule suffit
=MOYENNE(A2:A20)
en VBA
Application.Average(Range(Range("A2"), Range("A65536").End(xlUp)))
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
Pourquoi as tu écrit cette formule
=SI(NBVAL(RangeA)=0;"";MOYENNE(RangeA))
si c'est pour gérer l'erreur dans le cas de cellule vide depuis Excel 2007 tu peux écrire
=SIERREUR(MOYENNE(A2:A20);"")
pour une moyenne cette formule suffit
=MOYENNE(A2:A20)
en VBA
Application.Average(Range(Range("A2"), Range("A65536").End(xlUp)))
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
J'espère que ce n'est pas toi qui à mis un -1 à Ozone avec qui je suis entièrement d'accord pourquoi faire simple quand on peut faire compliqué.
sa réponse ne mérite pas cette note négative surtout qu'il a essayé d'aider.
je remets la note à 0