¿Cómo habilitar o deshabilitar el botón según el valor de la celda en Excel?
En este artículo, hablaré sobre algunos métodos para habilitar o deshabilitar el botón según el valor de la celda en la hoja de cálculo de Excel.
Habilite o deshabilite dos botones basados en datos de dos columnas con código VBA
Habilite o deshabilite un botón basado en dos valores de celda con código VBA
Habilite o deshabilite dos botones basados en datos de dos columnas con código VBA
Por ejemplo, tengo dos botones de comando en una hoja de trabajo, si la columna A tiene datos, el botón 1 está habilitado y el botón 2 está deshabilitado; si la columna C contiene datos, el botón 2 está habilitado y el botón 1 está deshabilitado. Para resolver esta tarea, el siguiente código VBA puede ayudarlo.
1. Haga clic con el botón derecho en la hoja que contiene los botones y luego elija Ver código en el menú contextual, vea la captura de pantalla:
2. En la Microsoft Visual Basic para aplicaciones ventana, copie y pegue el siguiente código en el módulo en blanco:
Código VBA: habilite o deshabilite dos botones basados en dos columnas:
Private Sub Worksheet_Change(ByVal Target As Range)
CommandButton1.Enabled = False
CommandButton2.Enabled = False
If Application.WorksheetFunction.CountA(Range("C:C")) > 0 Then
CommandButton2.Enabled = True
End If
If Application.WorksheetFunction.CountA(Range("A:A")) > 0 Then
CommandButton1.Enabled = True
End If
End Sub
Note: En el código anterior, Botón de comando1 y Botón de comando2 son los nombres de los botones, AUTOMÓVIL CLUB BRITÁNICO y C: C son las dos columnas que utiliza para habilitar o deshabilitar dos botones, cámbielas según sus necesidades.
3. Luego guarde y cierre la ventana del código; ahora obtendrá el siguiente resultado según lo necesite:
(1.) Si escribe datos en la columna A, el botón 1 está habilitado y el botón 2 está deshabilitado, vea la captura de pantalla:
(2.) Si escribe datos en la columna C, el botón 2 está habilitado y el botón 1 está deshabilitado, vea la captura de pantalla:
(3.) Tanto la columna A como la columna C tienen datos, dos botones están habilitados, vea la captura de pantalla:
(4.) Dos botones están deshabilitados si no hay datos en la Columna A y la Columna C, vea la captura de pantalla:
Habilite o deshabilite un botón basado en dos valores de celda con código VBA
Si desea habilitar o deshabilitar un botón de comando en función de dos valores de celda, como, por ejemplo, cuando el valor en A1 es mayor que el valor en B1, el botón está habilitado; de lo contrario, el botón está deshabilitado. El siguiente código VBA también puede hacerte un favor.
1. Haga clic derecho en la hoja que contiene el botón y luego elija Ver código desde el menú contextual, en el Microsoft Visual Basic para aplicaciones ventana, copie y pegue el siguiente código en el módulo en blanco, vea la captura de pantalla:
Código VBA: habilite o deshabilite un botón según dos valores de celda:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim TargetAdd As String
Dim xTemp As Double
On Error GoTo ExitSub
TargetAdd = Target.Address
CommandButton1.Enabled = False
If (TargetAdd = Range("A1").Address) Or (TargetAdd = Range("B1").Address) Then
If Range("A1") > Range("B1") Then
CommandButton1.Enabled = True
End If
End If
ExitSub:
End Sub
Note: En el código anterior, A1 y B1 son los valores de celda que usas, Botón Comando1 es el nombre del botón, cámbialo por el tuyo propio.
2. Luego guarde y cierre la ventana de código, ahora, si el valor de la celda en A1 es mayor que B1, el botón está habilitado; de lo contrario, si el valor de la celda en A1 es menor que B1, el botón está deshabilitado, vea la captura de pantalla:
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!