¿Cómo convertir comentarios a contenido de celda en Excel?
Supongamos que tengo celdas de rango llenas de comentarios en una hoja de trabajo, y ahora quiero convertir todos los comentarios en contenido de celda para poder imprimirlos de manera ordenada y redonda. ¿Existen buenas formas de resolver esta tarea?
Convierta comentarios en contenido de celda con la función definida por el usuario
Convierta comentarios a contenido de celda con código VBA
Convierta comentarios a contenido de celda con Kutools para Excel
Convierta comentarios en contenido de celda con la función definida por el usuario
Al usar este método, primero debe crear una función definida y luego aplicar la fórmula definida para convertir los comentarios en contenido de celda. Puedes terminarlo siguiendo los siguientes pasos:
1.Hacer clic Developer > Visual Basic, Un nuevo Microsoft Visual Basic para aplicaciones aparecerá la ventana, haga clic en recuadro > Módulo, e ingrese la siguiente función en el Módulo:
Función GetComments (pRng As Range) As String 'Updateby20140509 If Not pRng.Comment Is Nothing Then GetComments = pRng.Comment.Text End If End Función
2.Prensa Ctrl + S para guardar la función.
3Luego ingrese la siguiente fórmula “= Obtener comentarios (A1)”En cualquier celda en blanco, en este caso, usaré la celda E1. Ver captura de pantalla:
4. presione el Participar llave. Y seleccione la celda E1, luego arrastre el controlador de relleno sobre el rango de celdas que desea que contengan esta fórmula. Y todos los comentarios se convierten en contenido de celda. Ver captura de pantalla:
Convierta comentarios a contenido de celda con código VBA
Si conoce el código VBA, el siguiente código breve también puede ayudarlo a convertir comentarios en contenido de celda.
1. Seleccione el rango que desea convertir a contenido de celda;
2. Hacer clic Developer > Visual Basic, Un nuevo Microsoft Visual Basic para aplicaciones aparecerá la ventana, haga clic en recuadro > Móduloe ingrese el siguiente código en el módulo:
Sub CommentToCell()
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
Rng.Value = Rng.NoteText
Next
End Sub
3. Luego haga clic 
botón para ejecutar el código. Y seleccione un rango que desee convertir y luego haga clic en OK, y todos los comentarios seleccionados se han convertido en contenido de celda en sus celdas relevantes.
 |
 |
 |
Note: Si no desea los comentarios, puede eliminarlos.
Convierta comentarios a contenido de celda con Kutools para Excel
Kutools for Excel : con más de 300 prácticos complementos de Excel, prueba gratuita y sin límite en 30 días.Comprar ahora .
La Convertir comentario y celda of Kutools for Excel es una herramienta práctica y útil que puede ayudarlo a resolver muchos problemas relacionados con los comentarios.
Después de instalar Kutools for Excel, haga lo siguiente:
1. Seleccione el rango en el que desea importar los comentarios en las celdas.
2. Hacer clic Kutools > Más > Convertir comentario y celda, ver captura de pantalla:
3. En la Convertir comentario y celda cuadro de diálogo, seleccione Convertir comentarios en contenido de celdas. Ver captura de pantalla:
4. Luego haga clic OK. Ahora todos los comentarios seleccionados se convierten en contenido de celda en su rango original.
Para obtener información más detallada acerca de Convertir comentario y celda, Por favor visite Descripción de la función Convertir comentario y celda.
Artículos relacionados:
- Cambiar todos los formatos de comentarios en las celdas
- Cambiar el nombre del autor de todos los comentarios
- Enumere todos los comentarios en una nueva hoja de trabajo o libro de trabajo
- Buscar y reemplazar texto en comentarios
- Mostrar u ocultar todos los comentarios e indicadores de comentarios en Excel
- Convierta el contenido de la celda en comentarios en Excel
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
