VBA Lógico Operators: E, OU, NÃO, SE NÃO no Excel VBA

VBA Lógico Operatores: E, OU, NÃO

Excel VBA lógico Operatoros

Digamos que você queira processar um pedido de cliente. Para isso, você deve primeiro verificar se o produto encomendado existe ou não. Em caso afirmativo, você também deseja verificar se a quantidade disponível é suficiente. Os operadores lógicos são úteis nesses casos. Os operadores lógicos são usados ​​para avaliar mais de uma condição.

Os principais operadores lógicos do Excel VBA AND, OR, NOT estão listados na tabela abaixo:

S / N Operator Descrição Exemplo saída
1 E AND: Isso é usado para combinar mais de uma condição. Se todas as condições forem verdadeiras, AND será avaliado como verdadeiro. Se alguma das condições for falsa, AND será avaliado como falso Se verdadeiro = verdadeiro E falso = verdadeiro ENTÃO falso
2 OR OU: Isto é usado para combinar mais de uma condição. Se alguma das condições for avaliada como verdadeira, OR retornará verdadeiro. Se todos eles forem falsos, OR retorna falso Se verdadeiro = verdadeiro OU verdadeiro = falso ENTÃO verdadeiro
3 NÃO NÃO: Este funciona como uma função inversa. Se a condição for verdadeira, retorna falso, e se a condição for falsa, retorna verdadeiro. Se NÃO (verdadeiro) Então falso

VBA Lógico OperaExemplo de código-fonte

Por uma questão de simplicidade, compararemos números codificados.

Adicione botões ActiveX à planilha a partir da “opção Inserir”.

Defina as propriedades conforme mostrado na imagem abaixo

VBA Lógico Operatoros
VBA Lógico Operatoros

A tabela a seguir mostra as propriedades que você precisa alterar e os valores que você também precisa atualizar.

S / N Controlar Imóvel Valor
1 BotãoComando1 Nome btnAND
Subtítulo E Operator (0 = 0)
2 BotãoComando2 Nome btnOU
Subtítulo OR Operator (1 = 1) Ou (5 = 0)
3 BotãoComando3 Nome btnNÃO
Subtítulo NÃO Operapara Não (0 = )

Adicione o seguinte 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

VBA se E Operator

  • “Se (1 = 1) E (0 = 0) Então” a instrução if usa o operador lógico AND para combinar duas condições (1 = 1) e (0 = 0). Se ambas as condições forem verdadeiras, o código acima da palavra-chave 'Else' será executado. Se ambas as condições não forem verdadeiras, o código abaixo da palavra-chave 'Else' será executado.

Adicione o seguinte 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

VBA se OU Operator

  • “Se (1 = 1) ou (5 = 0) Então” a instrução if usa o operador lógico OR para combinar duas condições (1 = 1) e (5 = 0). Se alguma das condições for verdadeira, o código acima da palavra-chave Else será executado. Se ambas as condições forem falsas, o código abaixo da palavra-chave Else será executado.

Adicione o seguinte 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 se NÃO Operator

  • “Se não (0 = 0) então” a função If Not do VBA usa o operador lógico NOT para negar o resultado da condição da instrução if. Se as condições forem verdadeiras, o código abaixo da palavra-chave 'Else' será executado. Se a condição for verdadeira, o código acima da palavra-chave Else será executado.

Baixe o Excel contendo o código acima