Calcul d'une MOYENNE en VBA (avec parfois des valeurs d'erreurs #N/A)
2 réponses
RENAUD Eric
Bonjour,
J'ai une moyenne à calculer sur une plage de 12 valeurs maxi (Exemple de A1
à A12).
Le problème est qu'il arrive qu'une des cellules contienne une valeur
d'erreur.
Admettons que la cellule A7 soit avec une valeur d'erreur.
Manuellement je ferai :
=MOYENNE(A1:A6;A8:A12)
Mais en VBA ?
Je peux faire une boucle pour savoir quelles sont
les cellules avec des valeurs correctes mais comment
mettre uniquement les valeurs (adresses) correctes dans la formule qui suit
:
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
garnote
Salut Éric,
Quelque chose du genre, peut-être : Sub Moyenne() Range("C10").FormulaArray = "=AVERAGE(IF(ISERROR(R1C1:R20C1),"""",R1C1:R20C1))" End Sub
Serge
"RENAUD Eric" <erenaud(retirerceci)@fr.fm> a écrit dans le message de news:
Bonjour,
J'ai une moyenne à calculer sur une plage de 12 valeurs maxi (Exemple de A1 à A12). Le problème est qu'il arrive qu'une des cellules contienne une valeur d'erreur.
Admettons que la cellule A7 soit avec une valeur d'erreur. Manuellement je ferai : =MOYENNE(A1:A6;A8:A12)
Mais en VBA ? Je peux faire une boucle pour savoir quelles sont les cellules avec des valeurs correctes mais comment mettre uniquement les valeurs (adresses) correctes dans la formule qui suit :
Quelque chose du genre, peut-être :
Sub Moyenne()
Range("C10").FormulaArray = "=AVERAGE(IF(ISERROR(R1C1:R20C1),"""",R1C1:R20C1))"
End Sub
Serge
"RENAUD Eric" <erenaud(retirerceci)@fr.fm> a écrit dans le message de news: OfVViy1LHHA.4376@TK2MSFTNGP03.phx.gbl...
Bonjour,
J'ai une moyenne à calculer sur une plage de 12 valeurs maxi (Exemple de A1 à A12).
Le problème est qu'il arrive qu'une des cellules contienne une valeur d'erreur.
Admettons que la cellule A7 soit avec une valeur d'erreur.
Manuellement je ferai :
=MOYENNE(A1:A6;A8:A12)
Mais en VBA ?
Je peux faire une boucle pour savoir quelles sont
les cellules avec des valeurs correctes mais comment
mettre uniquement les valeurs (adresses) correctes dans la formule qui suit :
Quelque chose du genre, peut-être : Sub Moyenne() Range("C10").FormulaArray = "=AVERAGE(IF(ISERROR(R1C1:R20C1),"""",R1C1:R20C1))" End Sub
Serge
"RENAUD Eric" <erenaud(retirerceci)@fr.fm> a écrit dans le message de news:
Bonjour,
J'ai une moyenne à calculer sur une plage de 12 valeurs maxi (Exemple de A1 à A12). Le problème est qu'il arrive qu'une des cellules contienne une valeur d'erreur.
Admettons que la cellule A7 soit avec une valeur d'erreur. Manuellement je ferai : =MOYENNE(A1:A6;A8:A12)
Mais en VBA ? Je peux faire une boucle pour savoir quelles sont les cellules avec des valeurs correctes mais comment mettre uniquement les valeurs (adresses) correctes dans la formule qui suit :
Merci cela semble bien fonctionner. A+ Eric "garnote" a écrit dans le message de news: %23cyN$
Salut Éric,
Quelque chose du genre, peut-être : Sub Moyenne() Range("C10").FormulaArray = "=AVERAGE(IF(ISERROR(R1C1:R20C1),"""",R1C1:R20C1))" End Sub
Serge
"RENAUD Eric" <erenaud(retirerceci)@fr.fm> a écrit dans le message de news:
Bonjour,
J'ai une moyenne à calculer sur une plage de 12 valeurs maxi (Exemple de A1 à A12). Le problème est qu'il arrive qu'une des cellules contienne une valeur d'erreur.
Admettons que la cellule A7 soit avec une valeur d'erreur. Manuellement je ferai : =MOYENNE(A1:A6;A8:A12)
Mais en VBA ? Je peux faire une boucle pour savoir quelles sont les cellules avec des valeurs correctes mais comment mettre uniquement les valeurs (adresses) correctes dans la formule qui suit :
Merci cela semble bien fonctionner.
A+
Eric
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news:
%23cyN$N2LHHA.1240@TK2MSFTNGP03.phx.gbl...
Salut Éric,
Quelque chose du genre, peut-être :
Sub Moyenne()
Range("C10").FormulaArray =
"=AVERAGE(IF(ISERROR(R1C1:R20C1),"""",R1C1:R20C1))"
End Sub
Serge
"RENAUD Eric" <erenaud(retirerceci)@fr.fm> a écrit dans le message de
news: OfVViy1LHHA.4376@TK2MSFTNGP03.phx.gbl...
Bonjour,
J'ai une moyenne à calculer sur une plage de 12 valeurs maxi (Exemple de
A1 à A12).
Le problème est qu'il arrive qu'une des cellules contienne une valeur
d'erreur.
Admettons que la cellule A7 soit avec une valeur d'erreur.
Manuellement je ferai :
=MOYENNE(A1:A6;A8:A12)
Mais en VBA ?
Je peux faire une boucle pour savoir quelles sont
les cellules avec des valeurs correctes mais comment
mettre uniquement les valeurs (adresses) correctes dans la formule qui
suit :
Merci cela semble bien fonctionner. A+ Eric "garnote" a écrit dans le message de news: %23cyN$
Salut Éric,
Quelque chose du genre, peut-être : Sub Moyenne() Range("C10").FormulaArray = "=AVERAGE(IF(ISERROR(R1C1:R20C1),"""",R1C1:R20C1))" End Sub
Serge
"RENAUD Eric" <erenaud(retirerceci)@fr.fm> a écrit dans le message de news:
Bonjour,
J'ai une moyenne à calculer sur une plage de 12 valeurs maxi (Exemple de A1 à A12). Le problème est qu'il arrive qu'une des cellules contienne une valeur d'erreur.
Admettons que la cellule A7 soit avec une valeur d'erreur. Manuellement je ferai : =MOYENNE(A1:A6;A8:A12)
Mais en VBA ? Je peux faire une boucle pour savoir quelles sont les cellules avec des valeurs correctes mais comment mettre uniquement les valeurs (adresses) correctes dans la formule qui suit :
