Thanks Shailesh, works perfect!

Brgds

CG Rosén


"Shailesh Shah" wrote in message
...
Hi CG Rosén,

You need to remove Chr(10) before your text.

Use:

With ActiveCell.AddComment
.Visible = False
.Text Text:= "your text"

With ActiveCell.Comment.Shape.TextFrame
.HorizontalAlignment = xlLeft
.VerticalAlignment = xlTop
.AutoSize = True

End With
End With


Regards,
Shah Shailesh
http://members.lycos.co.uk/shahweb/


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!