Operadores lógicos de VBA: Y, O, NO
Operadores lógicos de Excel VBA
Supongamos que desea procesar un pedido de un cliente. Con ese fin, primero debe verificar si el producto pedido está allí o no. Si es así, también desea comprobar si la cantidad disponible es suficiente. Los operadores lógicos son útiles en tales casos. Los operadores lógicos se utilizan para evaluar más de una condición.
Los principales operadores lógicos de Excel VBA AND, OR, NO se enumeran en la siguiente tabla:
S / N. | Operador | Suelte | Ejemplo | Producción |
1 | Y | Y: se utiliza para combinar más de una condición. Si todas las condiciones son verdaderas, Y se evalúa como verdadera. Si alguna parte de la condición es falsa Y la considera falsa | Si es verdadero = verdadero Y falso = verdadero PERO | falso |
2 | O | O: Esto se usa para combinar más de una condición. Si alguna de las condiciones es verdadera, OR true devuelve. Si todos son falsos, devuelva O falso | Si verdadero = verdadero O verdadero = falso PERO | cierto |
3 | NO | NO: Esta funciona como una función inversa. Si la condición es verdadera, devuelve falso, y si una condición es falsa, devuelve verdadero. | Si NO (verdadero) Entonces | falso |
Código fuente de muestra de operadores lógicos de VBA
Para simplificar, compararemos números codificados de forma rígida.
Agregue botones ActiveX a la hoja desde la «opción Insertar».
Establezca las propiedades como se muestra en la imagen a continuación
La siguiente tabla muestra las propiedades que necesita cambiar y los valores que también necesita actualizar.
S / N. | Disciplina | Propiedad | Valor |
1 | CommandButton1 | Nombre | btnAND |
Subtitular | Operador Y (0 = 0) | ||
2 | CommandButton2 | Nombre | btnOR |
Subtitular | O Operador (1 = 1) O (5 = 0) | ||
3 | CommandButton3 | Nombre | btnNOT |
Subtitular | NO Operador (0 =) |
Agregue el siguiente código a btnAND_Click
Private Sub btnAND_Click() If (1 = 1) And (0 = 0) Then MsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator" Else MsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator" End If End Sub
Operador VBA If AND
- «Si (1 = 1) Y (0 = 0) Entonces» si la declaración usa el operador lógico AND para combinar dos condiciones (1 = 1) y (0 = 0). Si ambas condiciones son verdaderas, se ejecuta la palabra clave ‘Otro’ del código anterior. Si ambas condiciones no son verdaderas, se ejecuta el código debajo de la palabra clave ‘Otro’.
Agregue el siguiente código a btnOR_Click
Private Sub btnOR_Click() If (1 = 1) Or (5 = 0) Then MsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator" Else MsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator" End If End Sub
Operador VBA If OR
- «Si (1 = 1) O (5 = 0) Entonces» si la declaración usa el operador lógico O para combinar dos condiciones (1 = 1) y (5 = 0). Si alguna de las condiciones es verdadera, se ejecuta el código de la palabra clave anterior. Si ambas condiciones son falsas, se ejecuta el código debajo de la palabra clave Other.
Agregue el siguiente código a btnNOT_Click
Private Sub btnNOT_Click() If Not (0 = 0) Then MsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator" Else MsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator" End If End Sub
VBA si NO es un operador
- «Si no (0 = 0) Entonces» la función If Not VBA utiliza el operador lógico NOT para ignorar el resultado de la condición de declaración. Si las condiciones son verdaderas, se ejecuta el código debajo de la palabra clave ‘Otro’. Si la condición es verdadera, se ejecuta el código de la palabra clave anterior.