Hoặc là một hàm logic trong bất kỳ ngôn ngữ lập trình nào và tương tự trong VBA chúng ta có hàm OR, vì nó là một hàm logic, kết quả được đưa ra bởi hàm này là đúng hoặc sai, hàm này được sử dụng cho hai hoặc nhiều điều kiện cùng nhau và cho cho chúng tôi kết quả true khi một trong hai điều kiện được trả về true.
Hàm OR trong VBA là gì?
Trong excel, các hàm logic là trung tâm của các công thức chúng ta sử dụng hàng ngày. Các hàm logic ở đó để tiến hành kiểm tra logic và đưa ra kết quả ở kiểu dữ liệu Boolean, tức là TRUE hoặc FALSE. Một số công thức logic trong excel là “IF, IFERROR trong excel, ISERROR trong excel, AND và OR trong hàm excel.” Tôi hy vọng bạn đã sử dụng chúng khá thường xuyên như một hàm trang tính. Trong VBA cũng vậy, chúng ta có thể sử dụng tất cả chúng và trong bài viết này, chúng tôi sẽ giải thích cho bạn các cách sử dụng hàm “VBA OR”.
Điều đầu tiên xuất hiện trong đầu bạn khi bạn nghĩ đến từ “HOẶC” là gì?
Nói một cách dễ hiểu, “HOẶC” có nghĩa là “cái này hoặc cái kia”
Với ý tưởng tương tự, OR là một hàm logic cho kết quả là TRUE nếu bất kỳ một trong các phép thử logic nào là TRUE và cho kết quả là FALSE nếu không có bài kiểm tra logic nào là TRUE.
Điều này hoạt động hoàn toàn ngược lại với chức năng VBA AND. Hàm AND chỉ trả về TRUE nếu tất cả các điều kiện logic là ĐÚNG. Nếu bất kỳ ai trong số các điều kiện không được thỏa mãn, thì kết quả là chúng ta sẽ nhận được FALSE.
Công thức của hàm VBA OR
Hãy để tôi khung một cú pháp để bạn hiểu về hàm.
(Kiểm tra logic) HOẶC (Kiểm tra logic) HOẶC (Kiểm tra logic)
Đầu tiên, chúng ta cần đề cập đến kiểm tra logic là gì, sau đó đề cập đến từ HOẶC, sau đó đề cập đến kiểm tra logic thứ hai là gì. Nếu bạn muốn thực hiện một bài kiểm tra logic hơn, hãy đề cập đến từ HOẶC sau khi thực hiện một bài kiểm tra logic.
Trong tất cả các bài kiểm tra logic mà bạn làm, nếu bất kỳ ai trong số các bài kiểm tra đều hài lòng hoặc đúng, thì chúng tôi sẽ nhận được kết quả là TRUE nếu không có hoặc thỏa mãn thì kết quả là FALSE.
Ví dụ về việc sử dụng hàm OR trong VBA
Chúng tôi sẽ chỉ cho bạn một ví dụ đơn giản về việc sử dụng hàm OR trong VBA.
Để hiểu hàm VBA hợp lý HOẶC để tôi cho bạn một ví dụ. Giả sử chúng ta muốn thực hiện phép thử logic xem số 25 lớn hơn 20 hay số 50 nhỏ hơn 30.
Bước 1: Tạo tên macro.
Bước 2: Định nghĩa biến dưới dạng chuỗi.
Mã:
Sub OR_Example1 () Dim i As String End Sub
Bước 3: Bây giờ, đối với biến này, chúng ta sẽ gán giá trị thông qua phép kiểm tra logic OR.
Mã:
Sub OR_Example1 () Dim i As String i = End Sub
Bước 4: Kiểm tra logic đầu tiên của chúng tôi là 25> 20 .
Mã:
Sub OR_Example1 () Dim i As String i = 25> 20 End Sub
Bước 5: Bây giờ, sau bài kiểm tra logic đầu tiên, hãy đề cập đến từ HOẶC và bước vào bài kiểm tra logic thứ hai.
Mã:
Sub OR_Example1 () Dim i As String i = 25> 20 Hoặc 50 <30 End Sub
Bước 6: Ok, bây giờ hàm VBA OR kiểm tra xem các kiểm tra logic là TRUE hay FALSE. Bây giờ gán kết quả của biến vào hộp thông báo VBA .
Mã:
Sub OR_Example1 () Dim i As String i = 25> 20 Hoặc 50 <30 MsgBox i End Sub
Bước 7: Chạy macro và kết quả là gì.
Chúng tôi nhận được kết quả là ĐÚNG vì trong số hai phép thử logic mà chúng tôi đã cung cấp, một phép thử là ĐÚNG, vì vậy kết quả là ĐÚNG.
25 lớn hơn 20 và 50 không nhỏ hơn 30. Trong trường hợp này, phép thử logic đầu tiên là TRUE, nhưng phép thử thứ hai là FALSE. Bởi vì chúng tôi đã áp dụng hàm VBA OR, nó cần bất kỳ điều kiện nào là TRUE để nhận được kết quả là TRUE.
Bây giờ, hãy xem đoạn mã dưới đây.
Mã:
Sub OR_Example1 () Dim i As String i = 25 = 20 Hoặc 50 = 30 MsgBox i End Sub
Tôi đã thay đổi các phương trình kiểm tra logic từ> và <sang dấu bằng (=). Kết quả này sẽ trả về FALSE vì 25 không bằng 20 và 50 không bằng 30.
Hàm VBA OR với IF Điều kiện là mạnh mẽ
Như tôi đã nói, OR có thể trả về kết quả là TRUE hoặc FALSE, nhưng với hàm logic khác “IF”, chúng ta có thể điều chỉnh kết quả theo nhu cầu của mình.
Thực hiện các bài kiểm tra logic tương tự ở trên, OR chỉ trả về TRUE hoặc FALSE nhưng hãy kết hợp OR này với IF.
Bước 1: Trước khi tiến hành bất kỳ kiểm tra nào, hãy mở hàm IF .
Mã:
Sub OR_Example2 () Dim i As String IF End Sub
Bước 2: Bây giờ, hãy tiến hành kiểm tra bằng hàm OR .
Mã:
Sub OR_Example2 () Dim i As String IF 25 = 20 Hoặc 50 = 30 End Sub
Step 3: Put the word “Then” and write the result. If the condition is TRUE, assign the value to the variable as “Condition is Satisfied.”
Code:
Sub OR_Example2() Dim i As String If 25 = 20 Or 50 = 30 Then i = "Condition is Satisfied" End Sub
Step 4: If the condition is FALSE, then we need a different result, so put the word “ELSE” and, in the next line, assign the value to the variable “what should be the result if the condition or logical test is FALSE.”
Code:
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 Sub
Step 5: End the IF function with the word “End If.”
Code:
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 End Sub
Step 6: Assign the value of the variable result to the message box.
Code:
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
Run the macro, if the logical test is TRUE, we will get the result as “Condition is Satisfied,” or else we will get “Condition is not Satisfied.”
We got the result as “Condition is not Satisfied” because both the logical tests are FALSE.
Now I will change the logical tests.
Code:
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
I will run the macro and see what the result is.
Like this, we can use one logical function with other logical functions to arrive at the results.
Solve the below case study to get used to logical functions.
Case Study to Solve
I have employee names and their respective departments.
If you have tried and not found the result, then you can refer below code to understand the logic.
Code:
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
Nếu nhân viên đến từ “Tài chính” hoặc “CNTT”, thì họ sẽ nhận được tiền thưởng là “5000”. Đối với các nhân viên bộ phận khác, tiền thưởng là “1000”.
Tiến hành kiểm tra logic và đi đến kết quả.
