Eruano's Blog

Simple y con foco… como debe ser!

VB 2003 – Adicionar comentario a celda en Excel y re-dimensionarlo

leave a comment »

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.

Written by eruano

12 diciembre 2011 a 4:23 pm

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s

A %d blogueros les gusta esto: