Aprende a colocar, insertar o cambiar el texto de una celda en excel por insertar un comentario mediante macros, lo anterior nos permitirá convertir el texto de una celda por un comentario en excel.
Se debe tener presente que la macro la puedes descargar y en el momento de la ejecución te saldrá un recuadro para indicarle los parámetros de la información.
¿Como colocar el texto de una celda por un comentario automaticamente en excel?
Con esta macro nos va permitir realizar lo siguiente:
- Convertir o cambiar todas las celdas que contienen texto y se encuentren en una misma columna por insertar comentarios en excel.
Revisa el video para que aprendas a utilizar las dos macros y en la parte FINAL del articulo se encuentra el enlace para que puedas descargar la macro.
Importante que para utilizar la macro debemos de tener habilitados el menú de programador o desarrollador dependiendo de la versión de excel que tengas. En este CORTO VIDEO te explico como lo puedes HABILITAR
Después de que tengas habilitado las macros debemos de insertar un botón en la siguiente ruta.
En la barra Menú buscamos la pestaña Desarrollador o Programador y en el icono insertar buscamos la opción de insertar un botón.
y arrastramos con el mouse el tamaño como queremos el botón.
El botón le podemos cambiar el nombre presionando clic en el texto y lo cambiamos por el nombre que desees en el ejemplo se coloco Botón 1
Luego nos ubicamos en el botón y presionamos clic derecho asignar macro y ahí le podemos asignar un nombre a la macro y le decimos nuevo
La macro para convertir un texto de una celda en un comentario en excel consiste en lo siguiente
Se nombre tres variables, columna y fila como números enteros y texto como variable de texto
Dim columna As Integer
Dim fila As Integer
Dim texto As String
Se asigna a la variable Columna una caja de texto para asignarle el número de la columna donde se encuentra la información
columna = InputBox("Escriba el # de la columna donde comienza el primer valor, ejemplo si la columna es A el valor a escribir es 1, si es B se escribe el valor de 2 asi sucesivamente", "ESCRIBIR EL NÚMERO DE LA COLUMNA")
Se asigna a la variable Fila una caja de texto para asignarle el número de la fila donde comienza la información
fila = InputBox("Escriba el # de la fila donde comienza el primer valor, ejemplo si la fila es 1 el valor a escribir es 1, si es 2 se escribe el valor de 2 asi sucesivamente", "ESCRIBIR EL NÚMERO DE LA FILA")
Para la variable Texto se asigna la variable fila y columna para obtener la posición de la primera celda
texto = Cells(fila, columna)
Se asigna un contador para las columnas
celdacom = columna + 1
Se crea un ciclo con Do While hasta que sea diferente a vacío donde va convertir el texto de la celda en comentario.
Do While Cells(fila, columna) <> ""
texto = Cells(fila, columna)
Cells(fila, celdacom).AddComment
Cells(fila, celdacom).Comment.Visible = False
Cells(fila, celdacom).Comment.Text Text:=texto
fila = fila + 1
Loop
cuando se ejecute la macro aparecen las siguientes cajas de textos para asignar y digitar el número de la columna y el número de la fila.
Seguramente quieres sabes más acerca de Excel, no te olvides darte una vuelta por las siguientes secciones disponibles para ti de manera gratuita:
Canal de YouTube
Comunidad Telegram
Instagram: Aprende y Enseña Excel
Facebook: Aprende Excel Fácil
Twitter: Aprende y Enseña Excel
Hasta una próxima y te deseo el mayor de los EXITOS.
