Color dupe rows but differentiate

This is a cross between a programming issue and a formula issue. The attached workbook has a macro that applies a conditional formatting formula to the used range. That conditional formatting applies a shading (gray) to duplicate rows, ideally to make it easier to see the duplicates. But there's a problem; I can have multiple sets of duplicate rows immediately following each other. See the "A Child is Born" section in the "As the Macro does it" tab to see this in action. The net effect is that the shading doesn't differentiate between adjacent sets of duplicates. On the "As I'd like it" tab I've put what I'd like to see. I don't know if this can be achieved with a different conditional formatting formula, or if changes to the macro (other than formula) need to be made. I'd appreciate any help I can get with this.

Thanks,
John

Arlu,

The rows weren't colored because I colored that sheet by hand, and I'm not as good as a macro, so I just missed them.

The basic idea is to highlight what are dupes, but not have them all the same color, so I thought alternating colors would work well. But if you have a better idea I'm wide open to it.

Bumping this up because I'm still in need of a solution.

Arlette,
Very close, but not quite. See the attachment. I altered your macro to focus on column G instead of B, but didn't change anything else (I think). Notice on lines 15, 22, and 30 that no color is applied, and they should be.

Arlette,

I should have figured it was my mistake. Thanks for straightening me out and providing this code. I'll make sure to make good use of it.

Thanks,
John