Funzione OR VBA

Oppure è una funzione logica in uno qualsiasi dei linguaggi di programmazione e simili in VBA abbiamo la funzione OR, poiché è una funzione logica il risultato fornito da questa funzione è vero o falso, questa funzione viene utilizzata per due o più condizioni insieme e dà us true risultato quando una delle condizioni viene restituita true.

Cos'è la funzione OR in VBA?

In Excel le funzioni logiche sono il cuore delle formule che utilizziamo quotidianamente. Le funzioni logiche sono lì per condurre il test logico e danno il risultato nel tipo di dati booleano, cioè TRUE o FALSE. Alcune delle formule logiche in Excel sono "SE, SE.ERRORE in Excel, ISERRORE in Excel, AND e OR funzione excel". Spero che tu li abbia usati abbastanza spesso come funzione del foglio di lavoro. Anche in VBA possiamo usarli tutti e in questo articolo vi spiegheremo come utilizzare la funzione "VBA OR".

Qual è la prima cosa che ti viene in mente quando pensi alla parola "OR"?

In termini semplici "OR" significa "questo o quello"

Con la stessa idea OR è una funzione logica che fornisce il risultato come VERO se uno qualsiasi dei test logici è VERO e fornisce FALSO come risultato se nessuno dei test logici è VERO.

Funziona esattamente all'opposto della funzione AND di VBA. La funzione AND restituisce TRUE solo se tutte le condizioni logiche sono TRUE, se una qualsiasi delle condizioni non è soddisfatta, il risultato sarà FALSE.

Formula della funzione OR VBA

Consentitemi di inquadrare una sintassi per farvi comprendere la funzione.

[Test logico] O [Test logico] OR [Test logico]

Per prima cosa, dobbiamo menzionare qual è il test logico, quindi menzionare la parola OR quindi menzionare qual è il secondo test logico. Se desideri condurre un test più logico, menziona la parola OR dopo aver annullato il test logico.

Tra tutti i test logici che fai, se qualcuno dei test è soddisfatto o vero, otterremo il risultato come VERO, se nessuno o soddisfatto, il risultato è FALSO.

Esempi di utilizzo della funzione OR in VBA

Ti mostreremo un semplice esempio di utilizzo della funzione OR in VBA.

Puoi scaricare questo modello VBA O Excel qui - Modello VBA O Excel

Per capire la funzione VBA logica OPPURE lascia che ti faccia un esempio. Supponiamo di voler condurre il test logico se il numero 25 è maggiore di 20 o il numero 50 è minore di 30.

Passaggio 1: crea un nome per la macro.

Passaggio 2: definire la variabile come stringa.

Codice:

 Sub OR_Example1 () Dim i As String End Sub

Passaggio 3: ora per questa variabile, assegneremo il valore tramite il test logico OR.

Codice:

 Sub OR_Example1 () Dim i As String i = End Sub

Passaggio 4: il nostro primo test logico è 25> 20 .

Codice:

 Sub OR_Example1 () Dim i As String i = 25> 20 End Sub

Passaggio 5: ora, dopo il primo test logico, menzionare la parola OR e immettere il secondo test logico.

Codice:

 Sub OR_Example1 () Dim i As String i = 25> 20 Or 50 <30 End Sub

Passaggio 6: Ok, ora la funzione OR VBA verifica se i test logici sono VERO o FALSO. Ora assegna il risultato della variabile alla finestra di messaggio VBA .

Codice:

 Sub OR_Example1 () Dim i As String i = 25> 20 Or 50 <30 MsgBox i End Sub

Passaggio 7: eseguire la macro e qual è il risultato.

Abbiamo ottenuto il risultato come VERO perché di due test logici abbiamo fornito un test è VERO, quindi il risultato è VERO.

25 è maggiore di 20 e 50 non è minore di 30, in questo caso il primo test logico è VERO ma il secondo è FALSO. Poiché abbiamo applicato la funzione VBA OR, è necessario che una delle condizioni sia TRUE per ottenere il risultato come TRUE.

Ora guarda il codice sottostante.

Codice:

 Sub OR_Example1 () Dim i As String i = 25 = 20 Or 50 = 30 MsgBox i End Sub

Ho cambiato le equazioni del test logico da> e <al segno di uguale (=). Ciò restituirà FALSE come risultato perché 25 non è uguale a 20 e 50 non è uguale a 30.

La funzione VBA OR con IF La condizione è potente

Come ho detto, OR può restituire VERO o FALSO come risultato, ma con l'altra funzione logica "SE", possiamo manipolare i risultati secondo le nostre esigenze.

Prendi gli stessi test logici dall'alto, OR ha restituito solo VERO o FALSO ma combiniamo questo OR con IF.

Passaggio 1: prima di eseguire qualsiasi test, aprire la funzione IF .

Codice:

 Sub OR_Example2 () Dim i As String IF End Sub

Passaggio 2: ora eseguire i test utilizzando la funzione OR .

Codice:

 Sub OR_Example2 () Dim i As String IF 25 = 20 Or 50 = 30 End Sub

Passaggio 3: Metti la parola "Allora" e scrivi il risultato se la condizione è VERA, assegna il valore alla variabile come "La condizione è soddisfatta" .

Codice:

 Sub OR_Example2 () Dim i As String If 25 = 20 Or 50 = 30 Allora i = "La condizione è soddisfatta" End Sub

Passaggio 4: Se la condizione è FALSE, è necessario un risultato diverso, quindi inserire la parola "ELSE" e nella riga successiva assegnare il valore alla variabile "quale dovrebbe essere il risultato se la condizione o il test logico è FALSO".

Codice:

 Sub OR_Example2 () Dim i As String If 25 = 20 Or 50 = 30 Then i = "La condizione è soddisfatta" Altrimenti i = "La condizione non è soddisfatta" End Sub

Passaggio 5: terminare la funzione IF con la parola "End If" .

Codice:

 Sub OR_Example2 () Dim i As String If 25 = 20 Or 50 = 30 Then i = "La condizione è soddisfatta" Altrimenti i = "La condizione non è soddisfatta" End If End Sub

Passaggio 6: assegnare il valore del risultato della variabile alla finestra del messaggio .

Codice:

 Sub OR_Example2 () Dim i As String If 25 = 20 Or 50 = 30 Then i = "La condizione è soddisfatta" Altrimenti i = "La condizione non è soddisfatta" End If MsgBox i End Sub

Esegui la macro, se il test logico è VERO otterremo il risultato come "La condizione è soddisfatta" oppure otterremo "La condizione non è soddisfatta".

Abbiamo ottenuto il risultato come "Condizione non soddisfatta" perché entrambi i test logici sono FALSI.

Ora cambierò i test logici.

Codice:

 Sub OR_Example2 () Dim i As String If 25> 20 or 50 <30 Then i = "Condition is Satisfied" Else i = "Condition is not Satisfied" End If MsgBox i End Sub

Eseguirò la macro e vedrò qual è il risultato.

In questo modo, possiamo usare una funzione logica con altre funzioni logiche per arrivare ai risultati.

Risolvi il caso di studio seguente per abituarti alle funzioni logiche.

Case Study da risolvere

Ho i nomi dei dipendenti e i rispettivi reparti.

Se hai provato e non hai trovato il risultato, puoi fare riferimento al codice seguente per comprendere la logica.

Codice:

 Sub Bonus_Calculation () Dim i As Long For i = 2 To 10 If Cells (i, 2) .Value = "Finance" Or Cells (i, 2) .Value = "IT" Then Cells (i, 3) .Value = 5000 Else Cells (i, 3) .Value = 1000 End If Next i End Sub

If the employee is from “Finance” or “IT” then they should get the bonus as “5000”. For other department employees, the bonus is “1000”.

Conduct the logical test and arrive at the results.