Sort by one column

\'Sort Group, SubGroup, Project
Worksheets("Groups").Activate
Range("B3:Z65536").Select
Selection.Sort Key1:=Range("I3"), Order1:=xlAscending, Header:=xlNo, _
    OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
    DataOption1:=xlSortNormal
Worksheets("Subgroups").Activate
Range("B3:Z65536").Select
Selection.Sort Key1:=Range("L3"), Order1:=xlAscending, Header:=xlNo, _
    OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
    DataOption1:=xlSortNormal
Worksheets("Projects").Activate
Range("B3:Z65536").Select
Selection.Sort Key1:=Range("T3"), Order1:=xlAscending, Header:=xlNo, _
    OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
    DataOption1:=xlSortNormal