Logický operátor a | Logický operátor nebo | Logický operátor ne
Tři nejpoužívanější logické operátory v Excel VBA jsou: A, nebo ne a ne. Jako vždy použijeme jednoduché příklady, aby bylo vše jasnější.
Logický operátor And
Umístěte na list příkazové tlačítko a přidejte následující řádky kódu:
Dim score1 As Integer, score2 As Integer, result As String
score1 = Range ("A1"). Value
score2 = Range ("B1"). Hodnota
Pokud skóre1> = 60 A skóre2> 1 Potom
výsledek = "projít"
Jiný
výsledek = "selhání"
Konec If
Rozsah („C1“). Hodnota = výsledek
Vysvětlení: pokud je skóre1 větší nebo rovno 60 a skóre2 je větší než 1, Excel VBA vrátí vyhovující, jinak se vrátí Excel VBA selže.
Výsledek po kliknutí na příkazové tlačítko na listu:
Závěr: Vrácení Excel VBA selže, protože skóre2 není větší než 1.
Logický operátor Or
Umístěte na list příkazové tlačítko a přidejte následující řádky kódu:
Dim score1 As Integer, score2 As Integer, result As String
score1 = Range ("A1"). Value
score2 = Range ("B1"). Hodnota
Pokud skóre1> = 60 Nebo skóre2> 1 Potom
výsledek = "projít"
Jiný
výsledek = "selhání"
Konec If
Rozsah („C1“). Hodnota = výsledek
Vysvětlení: pokud je skóre1 větší nebo rovno 60 nebo skóre2 je větší než 1, Excel VBA vrátí vyhovující, jinak se vrátí Excel VBA selže.
Výsledek po kliknutí na příkazové tlačítko na listu:
Závěr: Excel VBA vrací povolení, protože skóre1 je větší nebo rovné 60.
Logický operátor ne
Umístěte na list příkazové tlačítko a přidejte následující řádky kódu:
Dim score1 As Integer, score2 As Integer, result As String
score1 = Range ("A1"). Value
score2 = Range ("B1"). Hodnota
Pokud skóre1> = 60 A ne skóre2 = 1 Potom
výsledek = "projít"
Jiný
výsledek = "selhání"
Konec If
Rozsah („C1“). Hodnota = výsledek
Vysvětlení: pokud je skóre1 větší nebo rovno 60 a skóre2 není rovno 1, Excel VBA vrátí vyhovující, jinak vrátí Excel VBA selže.
Výsledek po kliknutí na příkazové tlačítko na listu:
Závěr: Vrácení Excel VBA selže, protože skóre2 se rovná 1.
