In this thread I was suggested
Sub SortData()
Dim LR&
LR = Range("A" & Rows.Count).End(xlUp).Row
With ActiveSheet.Sort
.SortFields.Clear
.SortFields.Add Key:=Range("F3:F" & LR), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortTextAsNumbers
.SortFields.Add Key:=Range("C3:C" & LR), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortTextAsNumbers
.SetRange Range("A1:L" & LR)
.Header = xlYes
.Orientation = xlTopToBottom
.Apply
End With
End Sub
to sort my accounts by Utilization and keep the accounts that are at 0% utilized at the bottom of the list. It worked the first few times I tried it but now it won't. Instead when I run it by clicking the sort button with the dummy data it moves the 0% utilization to the top.
I also want to add two more Macros. One to sort it by amount of payments needed and the other to sort it by the balance.
When I have this working correctly I plan to offer it others to use in their own debt reduction attempts of course I would not be charging anyone for this spreadsheet.
Any help would be appreciated.
Bookmarks