Additionner les x plus grands chiffres

[nat54]

Bonjour,

Dernier problème pour finaliser mon fichier

En cellule W23, il faudrait qu'il me calcule le nombre de points selon le nb vitoire à prendre en compte
ce nombre est présent en cellule en W17

Merci d'avance,

 

[Monique]

Re : Additionner les x plus grands chiffres

Bonjour,

Fais un essai comme ça en W23 :
=SOMME(GRANDE.VALEUR(E8:E35;(LIGNE(INDIRECT(1&":"&MIN(W17;NB(E8:E35)))))))
à valider par ctrl, maj et entrée

Prend en compte 7 valeurs et non 8 ou 9 si, par exemple, les Grande.Valeur 7, 8 et 9 sont égales.

 

[Dan]

Re : Additionner les x plus grands chiffres

Bonjour,

Et bien Nat, le fichier a fameusement évolué là.
C'est hors du sujet ici mais, j'ai passé mon temps à modifier ta macro TCD qui se trouve dans le module 1. Cela donnerait ceci -->

Sub Actualiser_TCD()
With Application
    .ScreenUpdating = False
    .CommandBars("PivotTable").Visible = False
End With
Sheets("Statistiques").Select
With ActiveSheet
    .Unprotect  'déprotéger la feuille sinon actualisation impossible
    .PivotTables("Tableau croisé dynamique2").RefreshTable 'actualiser 1er TCD
    .PivotTables("Tableau croisé dynamique5").RefreshTable 'actualiser 2nd TCD
    .PivotTables("Tableau croisé dynamique6").RefreshTable 'actualiser 3ème TCD
    .PivotTables("Tableau croisé dynamique7").RefreshTable 'actualiser 4ème TCD
    .Protect DrawingObjects:=True, Contents:=True, Scenarios:=True 'protéger la feuille à nouveau
End With
Application.ScreenUpdating = True
End Sub

On pourrait aussi l'actualiser automatiquement lorsque tu actives la feuille Statistiques. D'où plus besoin de boutonde commande.

A bientôt

Dan

 

[nat54]

Re : Additionner les x plus grands chiffres

Merci Monique !
J'étais persuadée que tu allais m'aider 🙂

@ Dan : oui le fichier a bien évolué, et merci à XLD d'ailleurs pour cela.

Quand tu parles de bouton .. euh là les TCD s'actualisent lorsque tu valides la saisie d'un match
Donc pas de bouton à cliquer.

 

[Dan]

Re : Additionner les x plus grands chiffres

RE,

Ok Nat. Je n'avais pas vérifié cela. Je me suis contenté d'améliorer la rapidité de ta macro.

Il te suffit de remplacer celle que tu as dans ton fichier par celle que je te propose.

Bonne soirée

Dan

 

[nat54]

Re : Additionner les x plus grands chiffres

Merci
Je ne maitrise pas encore toutes ces subtilités.