Delete row based on cell FORMAT (color, font, etc) (not based on cell value)

I need a macro that will delete all rows with cells that contain a certain format in column A. Specifically, I want to delete all rows that have black text in column A.

A little history on this: I need to isolate duplicated values. My duplicated values are highlighted in light red and front is red. I need to keep those, and delete everything else. Thus why I want to delete rows with BLACK text in column A.

I will also need a macro that will delete rows with blank cells in column B - but that can wait as I need to do the other thing first.

Thank you,
trobey