Condiftional Formatting/Formula for Font Color Change when Comment Appears

[jnjohnson]

Good morning, I'm trying to figure out a formula or some sort of conditional formatting to change my font color HOT PINK when there is a comment added to that cell. And, when the comment is removed the font turns back to original color (black).

I originally used the VBA formula below, which changed the font to hot pink since there was a comment in that cell. But, when I went to delete the comment, the font stayed HOT PINK and didn't change back to original color.

Please Login or Register  to view this content.

Thank you!!

[mehmetcik]

Your code is good it just needs three additional lines.

However:-


Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Click on Edit to open your thread, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

(This thread should receive no further responses until this moderation request is fulfilled, as per Forum Rule 7)

[FDibbins]

jnjohnson Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Click on Edit to open your thread, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

[(I have added them for you - this time )

[mehmetcik]

Please Login or Register  to view this content.

[jnjohnson]

Thank you!! In trying this new code, the interior of the cell turns red. I'm wanting just the font to turn magenta (http://dmcritchie.mvps.org/excel/colors.htm) and the interior of the cell with No Fill. I ended up changing the With Rng.Interior to read With Rng.Font, but that did not work correctly.

Thanks again for your help, much appreciated!!