¿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
Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%
- Reutilizar: Inserte rápidamente fórmulas complejas, gráficos y cualquier cosa que hayas usado antes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
- Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
- Combinar celdas / filas / columnas sin perder datos; Contenido de celdas divididas; Combinar filas / columnas duplicadas... Prevenir celdas duplicadas; Comparar rangos...
- Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
- Copia exacta Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
- Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
- Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
- Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
- Más de 300 potentes funciones. Compatible con Office/Excel 2007-2021 y 365. Compatible con todos los idiomas. Fácil implementación en su empresa u organización. Funciones completas Prueba gratuita de 30 días. Garantía de devolución de dinero de 60 días.

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!











































