Discussion :

[fmris]

Bonjour
je voudrais réaliser une moyenne dans une cellule en réalisant la macro de ce type

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 While Cells(d, 1) <> ""
    Cells(d, 7).Select
    ActiveCell.Formula = Average(Range(Cells(d + 1, 7), Cells(d + 24, 7)))
 
    d = d + 24
    Wend

simplement je ne connais ce code pour réaliser une telle moyenne sachant que cette moyenne sera calculé en fonction de variables
meci pour votre aide

[Minick]

Salut,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells(d, 7).Value = application.WorksheetFunction.Average(Range(Cells(d + 1, 7), Cells(d + 24, 7)))

++
Minick