Excel VBA ne fonctionne pas
Les fonctions logiques sont utiles pour les calculs qui nécessitent plusieurs conditions ou critères à tester. Dans nos articles précédents, nous avons vu les conditions «VBA IF», «VBA OR» et «VBA AND». Dans cet article, nous discuterons de la fonction «VBA NOT» avec IF dans Excel. Afin de le comprendre d'abord, nous devons examiner la fonction «VBA NOT».
Exemples
Exemple 1
La fonction NOT est également disponible avec VBA, et elle fonctionne exactement de la même manière que la fonction Excel. Par exemple, regardez l'ensemble de code VBA ci-dessous.
Code:
Sub NOT_Example1 () Dim k As String k = Not (45 = 45) MsgBox k End Sub
Dans le code ci-dessus, nous avons déclaré la variable «k» comme une chaîne.
Dim k comme chaîne
Ensuite, nous avons attribué la valeur via la fonction NOT. Est-ce que NOT Function dit si le nombre 45 est égal à 45 ou non?
k = pas (45 = 45)
Ensuite, nous avons affecté la valeur renvoyée par la fonction NOT à la variable «k» dans la boîte de message.
MsgBox k
Exécutez le code et voyez quel est le résultat.
Exemple # 2 - PAS avec la fonction IF
Comme je l'ai dit dans l'un des articles précédents, "IF avec d'autres fonctions logiques sont les meilleures paires d'Excel."
De même, NOT with IF est utile à bien des égards. Avec IF, nous pouvons avoir nos propres résultats au lieu des résultats par défaut de TRUE ou FALSE.
Prenez le même exemple de code ci-dessus, et nous n'appliquerons PAS avec la fonction IF.
Code:
Sub NOT_Example2 () Dim k As String If Not (45 = 45) Then k = "Test result is TRUE" Sinon k = "Test result is FALSE" End If MsgBox k End Sub
Dans le code ci-dessus, nous avons modifié les résultats par défaut de "Le résultat du test est FALSE" et "Le résultat du test est VRAI". Si le test logique fourni est vrai, il renverra «Le résultat du test est FALSE» et si le test logique fourni est faux, il retournera. "Le résultat du test est VRAI."
Dans le code ci-dessus, nous avons la valeur 45 = 45, nous obtiendrons donc la réponse comme suit.
Exemple # 3 - PAS avancé
La fonction NOT est mieux utilisée avec la fonction IF. Nous pouvons utiliser cette fonction pour masquer toutes les feuilles sauf une feuille en particulier.
Nous avons différentes feuilles, comme suit dans notre excel.
Voici l'exemple de code pour masquer toutes les feuilles sauf une feuille particulière.
Code:
Sub NOT_Example3 () Dim Ws As Worksheet For Each Ws In ActiveWorkbook.Worksheets If not (Ws.Name = "Data Sheet") Then Ws.Visible = xlSheetVeryHideen End If Next Ws End Sub
Le code ci-dessus masque toutes les feuilles de calcul, à l'exception de la feuille de calcul «Fiche technique».
Vous pouvez utiliser ce code VBA pour masquer toutes les feuilles à l'exception d'une feuille particulière en changeant le nom de la feuille en votre nom de feuille.
Comme comment nous pouvons également afficher des feuilles dans Excel. Le code ci-dessous affichera toutes les feuilles à l'exception du nom de feuille «Fiche technique».
Code:
Sub NOT_Example4 () Dim Ws As Worksheet For Each Ws In ActiveWorkbook.Worksheets If not (Ws.Name = "Data Sheet") Then Ws.Visible = xlSheetVisible End If Next Ws End Sub
Le code ci-dessous n'affichera que le nom de la feuille «Fiche technique».
Code:
Sub NOT_Example3 () Dim Ws As Worksheet For Each Ws In ActiveWorkbook.Worksheets If not (Ws.Name "Data Sheet") Then Ws.Visible = xlSheetVisible End If Next Ws End Sub
