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
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 -
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 -
Merci de votre aide et surtout de la rapidité de vos réponses.
ccm81, ce que tu m'as proposé fonctionne, merci beaucoup !!!
Bonne journée.
