infinity
10-15-2009, 07:27 AM
Hello,
I am trying to sort based on a CurrentRegion selection. I keep getting an error. Can anyone help?
activeCell.CurrentRegion.Select
Selection.Sort.SortFields.Add Key1:=Range("T1"), Order:=xlDescending, _
Key2:=Range("D1"), Order:=xlAscending, Header:=xlGuess, MatchCase:=False, _
Orientation:=xlTopToBottom, DataOption:=xlSortNormal
Thank you in advance!
I am trying to sort based on a CurrentRegion selection. I keep getting an error. Can anyone help?
activeCell.CurrentRegion.Select
Selection.Sort.SortFields.Add Key1:=Range("T1"), Order:=xlDescending, _
Key2:=Range("D1"), Order:=xlAscending, Header:=xlGuess, MatchCase:=False, _
Orientation:=xlTopToBottom, DataOption:=xlSortNormal
Thank you in advance!