Calcul de moyenne sous VBA
Résolu
Prissy
-
Prissy -
Prissy -
Bonjour à tous,
J'ai un soucis avec le calcul de moyenne avec une macro.
J'ai plusieurs feuilles dans mon classeur, une concernant les données "DONNEES" à traiter et une autre concernant le récapitulatif " Taj "
Mes données sont illimités, j'ai donc crée une variable me permettant de selectionner que les données entrés par l'utilisateurs, j'ai donc écrit ça :
L = ActiveCell.Row - 1
Sheets("taj").Select
Range("D6").Select
ActiveCell.FormulaR1C1 = "=AVERAGE(DONNEES!R[1]C[-2]:R[L]C[-2])"
Mais ça beuge, il ne reconnait pas ma variable, quelqu'un aurait une solution pour faire une moyenne sur une plage variable
Merci par avance
J'ai un soucis avec le calcul de moyenne avec une macro.
J'ai plusieurs feuilles dans mon classeur, une concernant les données "DONNEES" à traiter et une autre concernant le récapitulatif " Taj "
Mes données sont illimités, j'ai donc crée une variable me permettant de selectionner que les données entrés par l'utilisateurs, j'ai donc écrit ça :
L = ActiveCell.Row - 1
Sheets("taj").Select
Range("D6").Select
ActiveCell.FormulaR1C1 = "=AVERAGE(DONNEES!R[1]C[-2]:R[L]C[-2])"
Mais ça beuge, il ne reconnait pas ma variable, quelqu'un aurait une solution pour faire une moyenne sur une plage variable
Merci par avance
A voir également:
- Calcul de moyenne sous VBA
- Calcul moyenne excel - Guide
- Calcul km marche à pied gratuit - Télécharger - Sport
- Calcul charpente bois gratuit - Télécharger - Architecture & Déco
- Logiciel gratuit calcul valeur nutritionnelle - Télécharger - Santé & Bien-être
- Moyenne en anglais excel - Guide
3 réponses
bonjour
Dans ta formula, L est une variable dont la valeur est calculée au dessus
donc il faut "inserer"sa valeur dans la formule
= "=average('feuil1'!R[1]C[-2]:R" & L & "C[-2])"
RQ1. on peut eviter les Select
Sheets("taj").Range("D6").FormulaR1C1 =
RQ2. on peut l'ecrire en français !!
.FormulaR1C1Local = "=moyenne('feuil1'!L(1)C(-2):L" & L & "C(-2))"
bonne suite
Dans ta formula, L est une variable dont la valeur est calculée au dessus
donc il faut "inserer"sa valeur dans la formule
= "=average('feuil1'!R[1]C[-2]:R" & L & "C[-2])"
RQ1. on peut eviter les Select
Sheets("taj").Range("D6").FormulaR1C1 =
RQ2. on peut l'ecrire en français !!
.FormulaR1C1Local = "=moyenne('feuil1'!L(1)C(-2):L" & L & "C(-2))"
bonne suite
Bonjour,
Pour mieux t'aider, il conviendrait d'avoir ton code.
Car je pense savoir quel est le problème mais pour en être sure et pour pouvoir m'en assurer, j'ai besoinde ton code ou encore mieux de ton classeur.
Tu peux le déposer sur ci-joint.com
Pour mieux t'aider, il conviendrait d'avoir ton code.
Car je pense savoir quel est le problème mais pour en être sure et pour pouvoir m'en assurer, j'ai besoinde ton code ou encore mieux de ton classeur.
Tu peux le déposer sur ci-joint.com