Discussion :

[Jmtafam]

Bonjour,

J'aurais besoin de calculer une médiane sur une ensemble de valeur, en excluant celles qui sont cachées par des filtres.

Je sais qu'il est possible de faire certaines opérations (somme, moyenne, nbval...) grâce à la fonction sous.total, mais je ne trouve pas de moyen simple pour en faire de même sur d'autres fonctions statistiques (moyenne, centiles...)

Des suggestions?

[Fvandermeulen]

Salut,
As tu essayé avec les Filtres élaborés qui te permettent de copier le résultat du filtre sur une autre feuille ? Tu peux alors prévoir tes calculs sur cette "copie"

Sinon, ça passe par du code VBA, voici un exemple pour la Mediane en considérant les valeurs en colonnes B

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
Sub MedianFiltre()
 
Dim r As Long, Tag As Long, DerLig As Long
Dim LaFormule As String
 
LaFormule = "=Median(" 'Début du texte qui fera office de formule à placer
DerLig = Sheets("TaFeuil").Cells(Columns(1).Cells.Count, 1).End(xlUp).Row 'Défini la dernière ligne remplie sur base de la colonne 1 (=>A)
 
For r = 2 To DerLig 'Boucle de la 2ème (car titre) à la dernière ligne remplie.
    If Sheets("TaFeuil").Rows(r).Hidden = False Then 'Si ligne visible (avec le filtre activé),
        Tag = Tag + 1 'Tag pour définir la première ligne et donc l'absence d'une virgule
            If Tag = 1 Then
                LaFormule = LaFormule & Cells(r, 2).Address '1 ère adaptation de la plage pour la formule
            Else
                LaFormule = LaFormule & "," & Cells(r, 2).Address 'Adaptation de la plage pour la formule
            End If
    End If
Next r
 
LaFormule = LaFormule & ")" 'Finalisation de la formule
Range("D1") = LaFormule 'Place la formule en D1
End Sub

Bonne continuation,

[Jmtafam]

Merci pour ta réponse Fvandermeulen
Je suis finalement passé par un tableau croisé dynamique comprenant:
-mes filtres
-l'échantillon de valeur dont je souhaite connaître la médiane en étiquette de ligne
-le nombre de chaque valeur en % du total dans la section valeur du tableau : de cette colonne je peux déduire la médiane.

[BenjGe]

la réponse a ta question était une formule matricielle:

=MEDIANE(SI(MaColonneText="truc";MaColonneAcalculer;""))

MaColonneText="truc" est le test correspondant à ton filtre.
Si tu filtres sur la France sous une colonne pays de B2:B100 ça donne
B2:B100="France".

Ou par les plages nommées:
Pays="France"