Bonjour,
Depuis de nombreux jours je parcours tout les forums possible sur VBA mais je ne trouve pas de réponse à mon problème...
J'ai une première feuille avec 11 actions avec leurs rendement rangés par colonne et j'aimerai calculer la moyenne des rendements de chaque action en redirigeant les resultats dans un tableau sur une autre feuille où la les actions sont rangées par ligne.
Pour le moment j'ai le code suivant:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22 Public Sub test() Dim moyenne As Double Dim rendement As Range Dim i As Integer, j As Integer Set plage = Range("P5", "Z63") For i = 1 To 12 For j = 1 To 11 ThisWorkbook.Sheets("feuil1").Cells(5, j).Select Set rendement = Range(Selection, Selection.End(xlDown)) moyenne = WorksheetFunction.Average(rendement) ThisWorkbook.Sheets("Résultats").Cells(i, 2).Value = moyenne Next j Next i End Sub
Les résultats s'inserent dans le tableau mais c'est le meme resultat qui est affiché pour les 11 actions..
Pourriez vous m'aider s'il vous plait, je desespère..
Cordialement!
Partager