I have a macro that works, but not as efficient as I need,
Its used for creating a list of forced shift changes. If someone is forced to amend their shift, they should then go to the bottom of the list. The only way I can do it is to use the date of the shift change. This is fine, but if i change say 3 people on the same date. They see to stack wrong: i.e
First Col is Starting List
Second Col is My Current Results
Third Col is the Desired Result required
1 4 4
2 5 5
3 6 6
4 7 7
5 8 8
6 9 9
7 10 10
8 11 11
9 12 12
10 3 1
11 2 2
12 1 3
This is my Macro:
Sub Button1_Click()
'
'
Sheets("FROM NIGHTS").Select
Range("C4:I20").Select
Selection.Sort Key1:=Range("D5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range("C4").Select
End Sub
Any help would be welcomed. Basically if two changes are made for the same date, I want the second one to go below the first one and not above the first one as in my results
Bookmarks