¿Cómo bloquear o desbloquear celdas según los valores en otra celda en Excel?
En algunos casos, es posible que deba bloquear o desbloquear celdas según los valores de otra celda. Por ejemplo, necesita que el rango B1: B4 se desbloquee si la celda A1 contiene el valor "Aceptando"; y debe bloquearse si la celda A1 contiene el valor "Rechazar". ¿Cómo puedes hacer para lograrlo? Este artículo te puede ayudar.
Bloquear o desbloquear celdas según los valores en otra celda con código VBA
Bloquear o desbloquear celdas según los valores en otra celda con código VBA
El siguiente código de VBA puede ayudarlo a bloquear o desbloquear celdas según el valor en otra celda en Excel.
1. Haga clic con el botón derecho en la pestaña de la hoja (la hoja con celdas que necesita bloquear o desbloquear según los valores de otra celda) y haga clic en Ver código desde el menú contextual.
2. Luego copie y pegue el siguiente código VBA en la ventana Código.
Código VBA: bloquee o desbloquee celdas según los valores en otra celda
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1") = "Accepting" Then
Range("B1:B4").Locked = False
ElseIf Range("A1") = "Refusing" Then
Range("B1:B4").Locked = True
End If
End Sub
3. presione el otro + Q teclas simultáneamente para cerrar el Microsoft Visual Basic para aplicaciones ventana.
De ahora en adelante, cuando ingresa el valor "Aceptando" en la celda A1, el rango B1: B4 se desbloquea.
Al ingresar el valor "Rechazar" en la celda A1, el rango especificado B1: B4 se bloquea automáticamente.
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 la imagen / imagen en o dentro de la celda 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!