VBA calcul de la moyenne d’une plage de données
Je souhaite affecter à la variable Cadence_Moy_Mois la moyenne d’une plage de données de la colonne CJ.
Mais une erreur 2007 me bloque.
La valeur de ActiveCell.Row est : 5
La valeur de Ligne_Date_Jour est : 5
Le code :
Dim Cadence_Moy_Mois, Mois_Precedent_Cadence As Integer
[s=co-4f81bd][/s]Dim Ligne_Date_Jour As Integer
[s=co-4f81bd][/s]Cadence_Moy_Mois = Application.Average(Range("CJ" & ActiveCell.Row + 1 & ":" & "CJ" & Ligne_Date_Jour))
Pouvez-vous m’aider ?
Merci d’avance.
Bonsoir,
si ActiveCell.Row = 5 et Ligne_Date_Jour = 5, alors tu fait la moyenne de CJ6:CJ5....
Cordialement,
Ah si c'était aussi simple...
La plage est variable, sur cet exemple j'ai communiqué les valeur car je ne suis pas sur de l'écriture de la fonction moyenne. J'y suis depuis ce matin en vain.
Re,
Ah si c'était aussi simple...
Je te faisais simplement remarquer la plage obtenue dans ta formule à partir de ton exemple, me paraissait bizarre....
Un petit fichier test peut-être en expliquant ce que tu souhaites obtenir ?
Cordialement,
Voici un fichier qui devrait me permettre de trouver la façon d'écrire la macro pour calculer la moyenne de la plage de données en colonne A
Encore MERCI pour ton aide précieuse, car cela fait des heures que je bute sur ce code.
Merci, je vais essayer de mettre en application le code.
Je n'arrive pas à écrire :
Set plage = .Range("CJ" & dl ":" & "CJ" & Ligne_Date_Jour)
pour remplacer : Set plage = .Range("A1:A" & dl)
Merci
Re,
Peut-être ainsi:
.Range ("CJ" & dl & ":CJ" & Ligne_Date_Jour)Cordialement,
Un grand Merci et bonne soirée.