I need to add an option to sort by cell color to the following macro. For Each Column On ActiveSheet.UsedRange.Columns Column.Sort Key1:=Column, Order1:=xlAscending, Header:=xlYes, MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal Next Column Need to add: SortOnCellColor, SortOnValueColor = RGB(255, 199, 206) in the above macro
Solved by E. Y. in 21 mins