Bonjour a tous
Je suis pas aussi débrouillard en Fonction Excel qu'en fonction VBA. Je cherche a obtenir la moyenne des valeurs qui se retrouvent entre deux critères.
J'ai fais la fonction en VBA, mais les fonctions d'Excel sont écritent en C++ sont plus rapide que ce que j,ai réussis à concocter.
Voici un exemple des nombreuses tentatives que j'ai essayé.(Mais sans succès) [file name=Moyenne_Si.zip size=4183]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Moyenne_Si.zip[/file]
Merci de votre aide !
Je suis pas aussi débrouillard en Fonction Excel qu'en fonction VBA. Je cherche a obtenir la moyenne des valeurs qui se retrouvent entre deux critères.
J'ai fais la fonction en VBA, mais les fonctions d'Excel sont écritent en C++ sont plus rapide que ce que j,ai réussis à concocter.
Option Explicit
Private Function MeanSTDIf(ByRef Plage As Range, ByRef CritèreMin As Double, ByRef CritèreMax As Double)
Dim dblArray() As Double
Dim Value As Variant
Dim intCount As Integer
For Each Value In Plage.Value2
Select Case Value
Case CritèreMin To CritèreMax
ReDim Preserve dblArray(intCount)
dblArray(intCount) = Value
intCount = intCount + 1
End Select
Next Value
MeanSTDIf = dblArray
End Function
Voici un exemple des nombreuses tentatives que j'ai essayé.(Mais sans succès) [file name=Moyenne_Si.zip size=4183]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Moyenne_Si.zip[/file]
Merci de votre aide !