VB 2003 – Adicionar comentario a celda en Excel y re-dimensionarlo
Trabajando sobre una exportacion desde VB 2003 a excel me encontre con un pequeño problemita: adicionar comentarios a una celda y ajustar el tamaño del cuadro de comentario para que el contenido del mismo se visualizara completo.
Buscando encontre la solucion:
' Se selecciona la celda sobre la que se quiere el comentario
Range("C1").Select
' Se crea el comentario para la celda
Range("C1").AddComment
' Se establece como visible el comentario
Range("C1").Comment.Visible = False
' Se esteblece el contenido del comentario
Range("C1").Comment.Text Text:="Este es mi hola mundo de comentarios!!"
' Se ajusta el tamaño del cuadro que contiene el comentario para permitir la visualizacion del texto
Range("C1").Comment.Shape.ScaleWidth 2, msoFalse, msoScaleFromTopLeft
Range("C1").Comment.Shape.ScaleHeight 1.5, msoFalse, msoScaleFromTopLeft
Un Saludo.
