Multiple Comments using VBA

I am using the below code in the attached worksheet to add comments in a few different cells. I can't get it to work once the source row becomes double digits (10+). Any help would be appreciated. Thank you!

Please Login or Register  to view this content.

I got Compile error. Expected: List Separator or )

I figured it out. Thankyou so much.

It did work but whenever I made a change to one of the source cells (I3), I got a Compile Error: End If without Block If. ??

I figured it out. I was missing an End With. Thank you soooo much!