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