The line of code that follows, which you helped me with, sorts data in A1:F15 when any one or more of the bottom rows contain no data:
Sub SortList()
Dim sList As Range
Set sList = Range(("A1"), Range("F65536").End(xlUp))
sList.Sort Key1:=Range("A1"), Order1:=xlDescending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Question:
How can I modify it so that t sorts data in GO32:GT44, when any one or more of thebottom lines contain no data?
When I try the following adaptation, the value in GO32 moves yp to GO1 and no sorting gets done!!
Sub SortList()
Dim sList As Range
Set sList = Range(("GO32"), Range("F65536").End(xlUp))
sList.Sort Key1:=Range("GO32"), Order1:=xlDescending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub
I would appreciate your help
Sub SortList()
Dim sList As Range
Set sList = Range(("A1"), Range("F65536").End(xlUp))
sList.Sort Key1:=Range("A1"), Order1:=xlDescending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Question:
How can I modify it so that t sorts data in GO32:GT44, when any one or more of thebottom lines contain no data?
When I try the following adaptation, the value in GO32 moves yp to GO1 and no sorting gets done!!
Sub SortList()
Dim sList As Range
Set sList = Range(("GO32"), Range("F65536").End(xlUp))
sList.Sort Key1:=Range("GO32"), Order1:=xlDescending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub
I would appreciate your help