Operadores lógicos de VBA: Y, O, NO
Operadores lógicos de Excel VBA
Digamos que desea procesar el pedido de un cliente. Para eso, primero debe verificar si el producto pedido existe o no. Si es así, también querrá 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 Y, O, NO se enumeran en la siguiente tabla:
| S / N | Operador | Descripción | Ejemplo | Producción |
| 1 | Y | Y: se utiliza para combinar más de una condición. Si todas las condiciones son verdaderas, AND se evalúa como verdadero. Si alguna de las condiciones es falsa, Y se evalúa como falso | Si verdadero = verdadero Y falso = verdadero ENTONCES | falso |
| 2 | O | O: Esto se usa para combinar más de una condición. Si alguna de las condiciones se evalúa como verdadera, OR devuelve verdadero. Si todos son falsos, O devuelve falso | Si es verdadero = verdadero O verdadero = falso ENTONCES | 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 ejemplo de operadores lógicos de VBA
En aras de la simplicidad, 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 necesita actualizar también.
| S / N | Control | Propiedad | Valor |
| 1 | CommandButton1 | Nombre | btnAND |
| Subtítulo | Operador Y (0 = 0) | ||
| 2 | CommandButton2 | Nombre | btnOR |
| Subtítulo | O Operador (1 = 1) O (5 = 0) | ||
| 3 | CommandButton3 | Nombre | btnNOT |
| Subtítulo | NO Operador No (0 =) |
Agregue el siguiente código a btnAND_Click
Private Sub btnAND_Click()If (1 = 1) And (0 = 0) ThenMsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator"ElseMsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator"End IfEnd Sub
Operador VBA If AND
- "Si (1 = 1) Y (0 = 0) Entonces" la instrucción if usa el operador lógico Y para combinar dos condiciones (1 = 1) Y (0 = 0). Si ambas condiciones son verdaderas, se ejecuta el código anterior a la palabra clave 'Else'. Si ambas condiciones no son verdaderas, se ejecuta el código debajo de la palabra clave 'Else'.
Agregue el siguiente código a btnOR_Click
Private Sub btnOR_Click()If (1 = 1) Or (5 = 0) ThenMsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator"ElseMsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator"End IfEnd Sub
Operador VBA If OR
- "Si (1 = 1) O (5 = 0) Entonces" la instrucción if usa el operador lógico OR para combinar dos condiciones (1 = 1) Y (5 = 0). Si alguna de las condiciones es verdadera, se ejecuta el código anterior a la palabra clave Else. Si ambas condiciones son falsas, se ejecuta el código debajo de la palabra clave Else.
Agregue el siguiente código a btnNOT_Click
Private Sub btnNOT_Click()If Not (0 = 0) ThenMsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator"ElseMsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator"End IfEnd Sub
VBA si no es operador
- "Si no (0 = 0) Entonces" la función Si no de VBA utiliza el operador lógico NOT para negar el resultado de la condición de instrucción if. Si las condiciones son verdaderas, se ejecuta el código debajo de la palabra clave 'Else'. Si la condición es verdadera, se ejecuta el código anterior a la palabra clave Else.
Descargar Excel que contiene el código anterior