Tamaño automatico a comentarios

Ya encontre la respuesta :

Sub InsertaComment()
With ActiveCell
.AddComment ("Lo que quiero escribir")
.Comment.Shape.TextFrame.AutoSize = True
End With
End Sub

De paso "promociono" la siguiente pagina que esta super:

http://www.vba-programmer.com/

Saludos,

B.M.