I figured it out. SRange is declared as a range
Set SortRange = ActiveSheet.Range("A1", "O773")
SortRange.Sort Key1:=ActiveSheet.Range("H1"), _
Order1:=xlAscending, Header:=xlYes, OrderCustom:=1, _
MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal...