Macro to sort based on score and subject

[Zimmerman]

Can somebody help me out with a macro that will sort the sheet by the users choice. I have a sheet that I'm trying to create that will keep track of how many correct answers each person gets per subject. What I'd like to do is be able to hit a button that will sort from the most to the least based on what subject it is. So if i want to sort thr top for math or for english or for whatever subject. Anybody have any ideas?

Windows XP
Excel 2003

 

[VoG]

Try this: right click the sheet tab, select View Code and paste in

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Static MySortType As Integer
Cancel = True
If MySortType = 0 Then
    MySortType = xlAscending
ElseIf MySortType = xlAscending Then
    MySortType = xlDescending
ElseIf MySortType = xlDescending Then
    MySortType = xlAscending
End If
Target.CurrentRegion.Sort key1:=Target, order1:=MySortType, Header:=xlYes
End Sub

Press ALT + Q to close the code window. Double click in any column to sort by it. double click it again to reverse the sort order.

 

[Zimmerman]

Exactly what i needed. Thank You very much!