How can I get a list in Excel to automatically sort in descending order when the data in the list changes?

Question

I have list of team names in one column and there point total in the next column. I want the list to automatically sort in descending order without having to click on the sort function.

Answer 1

I'm a little rusty with my VBA, but I think this will work if you enter a value and press enter. You will need to paste this in the workseet object that you want this to run on. (Click Alt-F11 to enter the Visual Basic editor, then click on the spreadsheet where you want this to run in the Project window, then paste this code in). You will also want to change the variable MyCells below to whatever range of cells you want to sort.
--------------------------------------------------------------------

Private Sub Worksheet_SelectionChange (ByVal Target As Range)
Dim MyCells As Range
Set MyCells = Range("A1:A10")

If Not Intersect(Target, MyCells) Is Nothing Then
MyCells.Sort Key1:=Range("A1"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:= xlSortTextAsNumbers
End If

End Sub

Answer 2

What you could do is record a macro that does a sort when you open the spreadsheet. New data will appear in rows that you keyed it but next time you open the sheet it will sort again.

Hope this helps.
Kind Regards,
QwertyKPH @ Yahoo