Bonjour,

Je fais appel à vous car j'ai besoin sur des données d'appareils de réaliser des moyennes journalières. Pour faire ceci, j'utilise la fonction suivante:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 l = 2
 i = 2
 While i < Range("A" & Rows.Count).End(xlUp).Row
 If Day(Cells(i, 1)) <> Day(Cells(i + 1, 1)) Then
 Range("h" & i).FormulaLocal = "=MOYENNE(k" & l & ":k" & i & ")"
 l = i + 1
 End If
 i = i + 1
 Wend
Cela fonctionne bien sauf dans le cas où pour faire la moyenne du jour J, je n'ai pas une seule valeur du jour j+1 (en gros si je veux la moyenne du 24, il me faut forcément une donnée le 25). Je pense que la réponse se trouve dans le End If mais je ne trouve pas la réponse.

Merci d'avance.