SortByColor macro not working

Hi,

In the attached workbook. I am using the following macro to sort the data on the basis of font color

Please Login or Register  to view this content.

But this is not sorting the data as it is supposed to (the black fonted rows should appear at top)
While manually sortingBy color is working on the same dataset

Help would be greatly appreciated

Imran Bhatti

Alright. Solved it

The mistake was that of RGB wrong. I was using automatic color RGB

Thanks if someone was reviewing it