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:" + vbC
runningmessage = runningmessage + subtotmessage(counters) + vbC

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

'Commen
Cells(8, checker + 5).AddCommen
Cells(8, checker + 5).Comment.Visible = Fals
Cells(8, checker + 5).Comment.Shape.TextFrame.AutoSize = Tru
Cells(8, checker + 5).Comment.Text Text:=runningmessag

Thanks for any help you can give me