¿Cómo insertar comentarios en una hoja de cálculo protegida?
Generalmente, es fácil insertar comentarios en las celdas de una hoja de cálculo sin protección. Pero a veces necesita proteger su hoja con una contraseña y, al mismo tiempo, desea poder insertar comentarios en la hoja protegida. ¿Cómo puede lograrlo en Excel?
Insertar comentarios en una hoja protegida marcando la opción Editar objetos
Insertar comentarios en una hoja protegida con código VBA
Insertar comentarios en una hoja protegida marcando la opción Editar objetos
Para insertar comentarios en una hoja protegida, marque la opción Editar objetos al proteger su hoja de cálculo. Siga estos pasos:
1. Haga clic en Revisar > Proteger hoja. Consulte la captura de pantalla:
2. En el cuadro de diálogo Proteger hoja, introduzca su contraseña en el cuadro de texto Contraseña para desproteger la hoja, desplácese hacia abajo y active la opción Editar objetos en el cuadro de lista Permitir a todos los usuarios de esta hoja. Consulte la captura de pantalla:
3. A continuación, haga clic en Aceptar y vuelva a introducir su contraseña en el cuadro de diálogo Confirmar contraseña.
4. A continuación, haga clic en Aceptar para cerrar los cuadros de diálogo. ¡Ahora su hoja está protegida, pero puede insertar comentarios en ella!
Nota: Con este método, no solo puede insertar comentarios, sino también otros objetos, como imágenes, gráficos, etc.
Insertar comentarios en una hoja protegida con código VBA
Además de marcar la opción **Editar objetos** al proteger la hoja, también puede aplicar el siguiente código VBA, que le permitirá insertar un comentario en una celda y, a continuación, proteger la hoja. Siga estos pasos:
1. Haga clic en la celda donde quiera insertar un comentario.
2. Mantenga pulsadas las teclas ALT + F11, lo que abrirá la ventana Microsoft Visual Basic para Aplicaciones.
3. Haga clic en Insertar > Módulo y pegue el siguiente código en la Ventana de módulo.
Código VBA: Insertar comentarios en una hoja protegida
Public Sub InsertComment()
'Update 20140723
Dim xPW As String
Dim xComment As String
xPW = “123456”
xTitleId = "KutoolsforExcel"
xComment = Application.InputBox("Input comments", xTitleId, "", Type:=2)
Application.ActiveSheet.Unprotect Password:=xPW
Application.ActiveCell.AddComment
Application.ActiveCell.Comment.Text Text:=xComment
ActiveSheet.Protect Password:=xPW
End Sub
4. A continuación, pulse la tecla F5 para ejecutar este código. Aparecerá un cuadro de diálogo en el que deberá introducir el contenido del comentario según sus necesidades. Consulte la captura de pantalla:
5. Haga clic en Aceptar para cerrar este cuadro; su comentario se habrá insertado en la celda especificada y su hoja de trabajo actual estará protegida al mismo tiempo.
Notas:
1. Puede cambiar la contraseña por la suya propia en la línea xPW = “123456” del código anterior.
2. Si desea insertar otro comentario, seleccione una celda y ejecute nuevamente este código para introducir el contenido del comentario.
Artículos relacionados:
¿Cómo filtrar comentarios en Excel?
¿Cómo se agrupan y desagrupan filas en una hoja protegida?
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active 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 dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos