Color format a string

I adding a string to a cell like this.

Please Login or Register  to view this content.

How can I format the added string to be font.color = red

I do not want the entire cell to be red.

maybe

Please Login or Register  to view this content.

That would only look for the first Chr(10) and apply everything after correct.

I would like to be able to have a different color for each line of characters added to the cell (delimited by Chr(10)).

In retrospect, using individual cells for the information would have been easier for formating, but I need the row height to be dynamic.

or so

Please Login or Register  to view this content.

Thats a great bit of code Nilem. You are awesome.

But unfortunately I didnt describe myself well enough.

I use the code to insert a line of text into the cell that i want to also be able to colorcode. Not just arbitrarily alternate colors. So some lines will be red, some black etc.

I could do an if statement and analyze each cell at the end, but why cant i just format the string when i insert it into the cell in the first place.

In any case, you have to decorate every part of the line again after inserting any substring.
may be a small sample in a file?