Hi,

Try replacing the constant vbCR with vbLF

Cheers
Andy

dumbass wrote:

Hi-
I am trying to add a comment to a subtotal showing what is included. The macro goes through a loop, adding to the comment string:

runningmessage = "The following tiers are included in this subtotal:" + vbCr
runningmessage = runningmessage + subtotmessage(counters) + vbCr

But after the adding the comment, the data displays horizontally instead of showing the carriage return. This is the code for the comment addition:

'Comment
Cells(8, checker + 5).AddComment
Cells(8, checker + 5).Comment.Visible = False
Cells(8, checker + 5).Comment.Shape.TextFrame.AutoSize = True
Cells(8, checker + 5).Comment.Text Text:=runningmessage

Thanks for any help you can give me!


--

Andy Pope, Microsoft MVP - Excel
http://www.andypope.info