Tri automatique en fonction du score

Bonjour à tous,

Je voudrais classer des compétiteurs de façon automatique au fur et à mesure qu'ils font des courses et que je leur attribue des points liés à leur ordre d'arrivée.

J'ai préparé un fichier contenant toutes les informations ; malheureusement je n'arrive pas à automatiser le tableau de l'onglet "Overview" de façon à ce que l'ordre se fasse automatiquement en fonction du "Final Score" de la colonne G.

Pourriez-vous svp m'aider ?

Je voudrais qu'à chaque ajout de points, le tableau affiche le premier score avec le nom associé, le second, le 3ème et ainsi de suite...

Cerise sur le gâteau : est-il possible d'insérer dans la colonne H le delta de points entre le premier et le second, le second et le 3ème et ainsi de suite ?

Merci beaucoup pour votre aide.

Bon samedi à tous !

Je joins le fichier.

Salim

Bonjour et bienvenue sur le forum

Un essai à tester. Te convient-il ?

Option Explicit

Dim i&

Private Sub Worksheet_Change(ByVal Target As Range)

    If Not Intersect(Target, Range("L4:AC21")) Is Nothing Then
        Application.EnableEvents = False
        Range("B4:G12").Sort key1:=Range("B4"), order1:=xlAscending, Header:=xlNo
        For i = 5 To 12
            Range("H" & i) = Range("D" & i - 1) - Range("D" & i)
        Next i
     End If
        Application.EnableEvents = True
End Sub

Bye

Merci beaucoup !!!!!

Je l'ai testé, ça fonctionne à merveille

Excellent Week-end