Case sensitive duplicate numbering

I have a dataset with 1 column with data that is separated by cells with "**".

XX
YY
YY
Xx
XX
Xx
**
XX
YY
YY
Xx
XX
Xx
**

Desired result after using macro (with numbers in second column):
XX 1
YY 1
YY 2
Xx 1
XX 2
Xx 2
** 1
XX 1
YY 1
YY 2
Xx 1
XX 2
Xx 2
** 1

Sadly my code isn't case sensitive, which kind of beats the purpose. My result:

XX 1
YY 1
YY 2
Xx 2
XX 3
Xx 4
** 1
XX 1
YY 1
YY 2
Xx 2
XX 3
Xx 4
** 1

Any suggestions? My current code:

Please Login or Register  to view this content.

Thanks a million in advance!

How about

Please Login or Register  to view this content.

Absolutely perfect. Thanks so much.

You're welcome & thanks for the feedback.