Excel VBA no funciona
Las funciones lógicas son útiles para los cálculos que requieren múltiples condiciones o criterios para probar. En nuestros artículos anteriores, hemos visto las condiciones "VBA IF", "VBA OR" y "VBA AND". En este artículo, discutiremos el "VBA NOT" con la función IF en Excel. Para entenderlo primero, necesitamos mirar la función "VBA NOT".
Ejemplos
Ejemplo 1
La función NO también está disponible con VBA, y funciona exactamente igual que la función de Excel. Por ejemplo, mire el siguiente conjunto de código VBA.
Código:
Sub NOT_Example1 () Dim k As String k = Not (45 = 45) MsgBox k End Sub
En el código anterior, hemos declarado la variable "k" como una cadena.
Dim k como cadena
A continuación, hemos asignado el valor mediante la función NOT. ¿La función NOT dice si el número 45 es igual a 45 o no?
k = No (45 = 45)
A continuación, hemos asignado el valor devuelto por la función NOT a la variable “k” en el cuadro de mensaje.
MsgBox k
Ejecute el código y vea cuál es el resultado.
Ejemplo # 2 - NO con la función IF
Como dije en uno de los artículos anteriores, "SI con otras funciones lógicas son los mejores pares en Excel".
De manera similar, NOT with IF es útil de muchas maneras. Con IF, podemos tener nuestros propios resultados en lugar de los resultados predeterminados de VERDADERO o FALSO.
Tome el mismo código de ejemplo de arriba, y aplicaremos NO con la función IF.
Código:
Sub NOT_Example2 () Dim k As String If Not (45 = 45) Entonces k = "El resultado de la prueba es VERDADERO" Else k = "El resultado de la prueba es FALSO" End If MsgBox k End Sub
En el código anterior, hemos modificado los resultados predeterminados de "El resultado de la prueba es FALSO" y "El resultado de la prueba es VERDADERO". Si la prueba lógica proporcionada es verdadera, devolverá "El resultado de la prueba es FALSO", y si la prueba lógica proporcionada es falsa, devolverá. "El resultado de la prueba es VERDADERO".
En el código anterior, tenemos un valor de 45 = 45, por lo que obtendremos la respuesta de la siguiente manera.
Ejemplo # 3 - NO avanzado
La función NO se utiliza mejor con la función SI. Podemos usar esta función para ocultar todas las hojas excepto una hoja en particular.
Tenemos varias hojas, como sigue en nuestro Excel.
A continuación se muestra el código de muestra para ocultar todas las hojas excepto una hoja en particular.
Código:
Sub NOT_Example3 () Dim Ws como hoja de trabajo para cada W en ActiveWorkbook.Worksheets Si no (Ws.Name = "Data Sheet") Entonces Ws.Visible = xlSheetVeryHideen End If Next Ws End Sub
El código anterior oculta todas las hojas de trabajo excepto la hoja de trabajo "Hoja de datos".
Puede usar este código VBA para ocultar todas las hojas excepto una hoja en particular cambiando el nombre de la hoja a su nombre de hoja.
Por ejemplo, también podemos mostrar hojas en Excel. El siguiente código mostrará todas las hojas excepto el nombre de la hoja "Hoja de datos".
Código:
Sub NOT_Example4 () Dim Ws como hoja de trabajo para cada W en ActiveWorkbook.Worksheets Si no (Ws.Name = "Hoja de datos") Entonces Ws.Visible = xlSheetVisible End If Next Ws End Sub
El siguiente código mostrará solo el nombre de la hoja "Hoja de datos".
Código:
Sub NOT_Example3 () Dim Ws como hoja de trabajo para cada W en ActiveWorkbook.Worksheets Si no (Ws.Name "Data Sheet") Entonces Ws.Visible = xlSheetVisible End If Next Ws End Sub
