Assuming 4 columns
Player League Cup Total
and for the purpose of illustration I've assumed Row 1 contains those titles and then there are 10 players listed with their scores (yes - even I know that is not enough players but for illustration...):
Right click the Excel logo just to the left of File on the menu bar and select View Code. Copy the following and paste it into the code window:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("Sheet1").Range("A2:D11").Sort Key1:=Range("D2"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
Adjust Range("A2:D11") to suit.
Now whenever you save the workbook your list will be sorted (even if you hit the Cancel button).