peradores lógicos VBA: AND, OR, NOT, IF NOT in Excel VBA

Operadores lógicos VBA: AND, OR, NOT

Operadores lógicos do Excel VBA

Digamos que você queira processar um pedido de cliente. Para isso, você deve primeiro verificar se o produto pedido 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. 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 Operador Descrição Exemplo Resultado
1EE: 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 avalia como falsaSe verdadeiro = verdadeiro AND falso = verdadeiro ENTÃOfalso
doisOUOU: Isso é 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 falsoSe verdadeiro = verdadeiro OU verdadeiro = falso ENTÃOverdadeiro
3NÃONÃO: Este funciona como uma função inversa. Se a condição for verdadeira, ela retornará falsa e, se uma condição for falsa, ela retornará verdadeira.Se NÃO (verdadeiro) Entãofalso

Código-fonte de exemplo de operadores lógicos VBA

Para simplificar, compararemos números codificados.

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

Defina as propriedades conforme mostrado na imagem abaixo

Operadores lógicos VBA

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

S / N Ao controle Propriedade Valor
1CommandButton1NomebtnAND
RubricaOperador AND (0 = 0)
doisCommandButton2NomebtnOR
RubricaOperador OR (1 = 1) Ou (5 = 0)
3CommandButton3NomebtnNOT
RubricaNÃO operador, 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 

Operador VBA If AND

  • '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 

Operador VBA If OR

  • '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 Operador

  • 'Se não (0 = 0) então' a função VBA If Not 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