VBA या फंक्शन (उदाहरण) - VBA में लॉजिकल ऑपरेटर का उपयोग कैसे करें?

या किसी प्रोग्रामिंग लैंग्वेज में लॉजिकल फंक्शन होता है और वीबीए में भी ऐसा ही होता है। या तो सही परिणाम आने पर हमें सही परिणाम मिलेगा।

VBA में OR फ़ंक्शन क्या है?

एक्सेल में, तार्किक कार्य उन सूत्रों का दिल होते हैं जिनका हम दैनिक आधार पर उपयोग करते हैं। तार्किक परीक्षण करने के लिए तार्किक कार्य होते हैं और बूलियन डेटा प्रकार में परिणाम देता है, अर्थात, TRUE या FALSE। एक्सेल में कुछ तार्किक सूत्र "IF, IFERROR in excel, ISERROR in excel, AND, and OR excel function हैं।" मुझे आशा है कि आपने उन्हें वर्कशीट फ़ंक्शन के रूप में काफी बार उपयोग किया होगा। VBA में भी, हम उन सभी का उपयोग कर सकते हैं, और इस लेख में, हम आपको "VBA OR" फ़ंक्शन का उपयोग करने के तरीके बताएंगे।

जब आपके मन में "ओआर" शब्द के बारे में सोचा जाता है, तो पहली बात क्या है?

सरल शब्दों में, "OR" का अर्थ है "या तो यह या वह"

एक ही विचार के साथ, या एक तार्किक फ़ंक्शन है जो TRUE के रूप में परिणाम देता है यदि कोई तार्किक परीक्षण TRUE है और यदि कोई तार्किक परीक्षण TRUE नहीं है, तो परिणाम FALSE देता है।

यह VBA और फ़ंक्शन के बिल्कुल विपरीत काम करता है। AND फ़ंक्शन केवल TRUE लौटाता है यदि सभी तार्किक स्थितियाँ TRUE हैं। यदि शर्तों में से कोई भी संतुष्ट नहीं है, तो परिणामस्वरूप हमें FALSE मिलेगा।

VBA या फ़ंक्शन का सूत्र

फ़ंक्शन को समझने के लिए मुझे एक सिंटैक्स फ्रेम करने दें।

(लॉजिकल टेस्ट) या (लॉजिकल टेस्ट) या (लॉजिकल टेस्ट)

सबसे पहले, हमें यह उल्लेख करने की आवश्यकता है कि तार्किक परीक्षण क्या है, फिर OR शब्द का उल्लेख करें, फिर उल्लेख करें कि दूसरा तार्किक परीक्षण क्या है। यदि आप अधिक तार्किक परीक्षा आयोजित करना चाहते हैं, तो शब्द का उल्लेख करें या तार्किक परीक्षण करने के बाद।

आपके द्वारा किए जाने वाले सभी तार्किक परीक्षणों में से यदि कोई भी परीक्षण संतुष्ट या सत्य है, तो हमें परिणाम TRUE के रूप में मिलेगा यदि कोई नहीं या संतुष्ट नहीं है, तो परिणाम FALSE है।

VBA में यूआरए या फंक्शन के उदाहरण

हम आपको VBA में OR फ़ंक्शन का उपयोग करने का एक सरल उदाहरण दिखाएंगे।

तार्किक VBA फ़ंक्शन को समझने के लिए या मुझे एक उदाहरण दें। मान लें कि हम तार्किक परीक्षण करना चाहते हैं कि क्या संख्या 25 20 से अधिक है या संख्या 50 30 से कम है।

चरण 1: एक मैक्रो नाम बनाएँ।

चरण 2: एक स्ट्रिंग के रूप में चर को परिभाषित करें।

कोड:

उप OR_Example1 () मंद i यथा स्ट्रिंग अंत उप

चरण 3: अब, इस चर के लिए, हम OR लॉजिकल टेस्ट के माध्यम से मान असाइन करेंगे।

कोड:

उप OR_Example1 () डिम i ऐस स्ट्रिंग i = एंड सब

चरण 4: हमारा पहला तार्किक परीक्षण 25> 20 है

कोड:

उप OR_Example1 () डिम i ऐस स्ट्रिंग i = 25> 20 एंड सब

चरण 5: अब, पहले तार्किक परीक्षण के बाद, शब्द का उल्लेख करें या दूसरा तार्किक परीक्षण दर्ज करें।

कोड:

उप OR_Example1 () मंद i अस स्ट्रिंग i = 25> 20 या 50 <30 अंत उप

चरण 6: ठीक है, अब VBA या फ़ंक्शन परीक्षण करता है कि क्या तार्किक परीक्षण TRUE या FALSE हैं। अब चर के परिणाम को VBA संदेश बॉक्स में असाइन करें ।

कोड:

उप OR_Example1 () डिम i ऐस स्ट्रिंग i = 25> 20 या 50 <30 MsgBox i End Sub

चरण 7: मैक्रो चलाएँ और परिणाम क्या है।

हमें TRUE के रूप में परिणाम मिला क्योंकि हमने जो दो तार्किक परीक्षण दिए हैं, उनमें से एक परीक्षण TRUE है, इसलिए परिणाम TRUE है।

25 20 से अधिक है, और 50 30 से कम नहीं है। इस मामले में, पहला तार्किक परीक्षण TRUE है, लेकिन दूसरा FALSE है। क्योंकि हमने VBA या फ़ंक्शन को लागू किया है, इसलिए इसे TRUE के रूप में परिणाम प्राप्त करने के लिए TRUE में से किसी एक की आवश्यकता है।

अब, नीचे दिए गए कोड को देखें।

कोड:

उप OR_Example1 () मंद i यथा स्ट्रिंग i = 25 = 20 या 50 = 30 MsgBox i End Sub

मेरे पास तार्किक परीक्षण समीकरण> और <से समान (=) चिह्न में हैं। यह परिणाम के रूप में FALSE लौटाएगा क्योंकि 25 20 के बराबर नहीं है और 50 30 के बराबर नहीं है।

वीबीए या फंक्शन विथ आईएफ कंडीशन पावरफुल है

जैसा कि मैंने बताया, या तो परिणाम के रूप में TRUE या FALSE वापस कर सकते हैं, लेकिन दूसरे तार्किक कार्य "IF" के साथ, हम अपनी आवश्यकताओं के अनुसार परिणामों में हेरफेर कर सकते हैं।

ऊपर से एक ही तार्किक परीक्षण करें, या केवल TRUE या FALSE लौटाया है, लेकिन आइए इसे IF के साथ संयोजित करें।

चरण 1: किसी भी परीक्षा को आयोजित करने से पहले, फ़ंक्शन IF खोलें ।

कोड:

उप OR_Example2 () यदि मैं स्ट्रिंग अंत उप के रूप में मंद हूँ

चरण 2: अब, OR फ़ंक्शन का उपयोग करके परीक्षण करें ।

कोड:

उप OR_Example2 () डिम i ऐस स्ट्रिंगिंग आईएफ 25 = 20 या 50 = 30 एंड सब

चरण 3: "तब" शब्द डालें और परिणाम लिखें। यदि स्थिति सही है, तो चर को "स्थिति संतुष्ट है" के रूप में मान असाइन करें

कोड:

उप OR_Example2 () यदि मैं स्ट्रिंग के रूप में २५ = २० या ५० = ३० तो मैं = "स्थिति संतोषजनक है"

चरण 4: यदि शर्त FALSE है, तो हमें एक अलग परिणाम की आवश्यकता है, इसलिए शब्द "ELSE" डालें और अगली पंक्ति में, चर का मान असाइन करें "यदि परिणाम या तार्किक परीक्षण FALSE है तो परिणाम क्या होना चाहिए? । ”

कोड:

उप OR_Example2 () डिम i ऐज़ स्ट्रिंग यदि 25 = 20 या 50 = 30 तब i = "स्थिति संतुष्ट है" Else i = "स्थिति संतुष्ट नहीं है" अंत उप

चरण 5: शब्द "अंत यदि" के साथ IF फ़ंक्शन समाप्त करें।

कोड:

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

यदि कर्मचारी "वित्त" या "आईटी" से है, तो उन्हें "5000" के रूप में बोनस मिलना चाहिए। अन्य विभाग के कर्मचारियों के लिए, बोनस "1000" है।

तार्किक परीक्षा का संचालन करें और परिणामों पर पहुंचें।

दिलचस्प लेख...