¿Cómo bloquear celdas especificadas sin proteger toda la hoja de trabajo en Excel?
Normalmente, debe proteger toda la hoja de trabajo para bloquear las celdas para que no se editen. ¿Existe algún método para bloquear celdas sin proteger toda la hoja de trabajo? Este artículo recomienda un método VBA para usted.
Bloquear celdas especificadas sin proteger toda la hoja de trabajo con VBA
Bloquear celdas especificadas sin proteger toda la hoja de trabajo con VBA
Suponiendo que necesita bloquear las celdas A3 y A5 en la hoja de trabajo actual, el siguiente código VBA lo ayudará a lograrlo sin proteger toda la hoja de trabajo.
1. Haga clic con el botón derecho en la pestaña de la hoja y seleccione Ver código desde el menú contextual.
2. Luego copie y pegue el siguiente código VBA en la ventana Código. Ver captura de pantalla:
Código VBA: bloquee celdas especificadas sin proteger toda la hoja de trabajo
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
If Target.Row = 3 Or Target.Row = 5 Then
Beep
Cells(Target.Row, Target.Column).Offset(0, 1).Select
End If
End If
End Sub
Note: En el código, Columna 1, Row = 3 y Row = 5 indique que las celdas A3 y A5 en la hoja de trabajo actual se bloquearán después de ejecutar el código. Puede cambiarlos cuando lo necesite.
3. presione el otro + Q teclas simultáneamente para cerrar el Microsoft Visual Basic para aplicaciones ventana.
Ahora las celdas A3 y A5 están bloqueadas en la hoja de trabajo actual. Si intenta seleccionar la celda A3 o A5 en la hoja de trabajo actual, el cursor se moverá automáticamente a la celda adyacente derecha.
Artículos relacionados:
- ¿Cómo bloquear todas las referencias de celda en fórmulas a la vez en Excel?
- ¿Cómo bloquear o proteger las celdas después de la entrada o entrada de datos en Excel?
- ¿Cómo bloquear o desbloquear celdas según los valores en otra celda en Excel?
- ¿Cómo bloquear la imagen / imagen en o dentro de la celda en Excel?
- ¿Cómo bloquear el ancho y la altura de la celda para que no cambie el tamaño 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!