एक्सेल VBA सबरूटीन: उदाहरण के लिए VBA में उप को कैसे कॉल करें

VBA में एक सबरूटीन क्या है?

वीबीए में एक सबरूटीन कोड का एक टुकड़ा है जो कोड में वर्णित एक विशिष्ट कार्य करता है, लेकिन परिणाम या मूल्य वापस नहीं करता है। Subroutines का उपयोग छोटे प्रबंधनीय भागों में कोड के बड़े टुकड़ों को तोड़ने के लिए किया जाता है। कार्यक्रम में कहीं से भी कई बार सबरूटिन को वापस बुलाया जा सकता है।

मान लें कि आपने उपयोगकर्ता इनपुट डेटा को स्वीकार करने के लिए टेक्स्ट बॉक्स के साथ एक यूजर इंटरफेस बनाया है। आप एक सबरूटीन बना सकते हैं जो टेक्स्ट बॉक्स की सामग्री को साफ करता है। एक VBA कॉल सबरूटीन ऐसे परिदृश्य में उपयुक्त है क्योंकि आप किसी भी परिणाम को वापस नहीं करना चाहते हैं।

इस VBA ट्यूटोरियल में, आप सीखेंगे-

• क्यों Subroutines का उपयोग करें
• सबरूटीन्स और कार्यों के नामकरण के नियम
• वीबीए सबरूटीन सिंटेक्स
• VBA में उप को कैसे कॉल करें

क्यों Subroutines का उपयोग करें

• छोटे प्रबंधनीय कोड में ब्रेक कोड : एक औसत कंप्यूटर प्रोग्राम में हजारों और हजारों स्रोत कोड लाइनें होती हैं। यह जटिलता का परिचय देता है। कोड के छोटे प्रबंधनीय विखंडू में कार्यक्रम को तोड़कर सबरूटीन इस समस्या को हल करने में मदद करते हैं।
• कोड पुन: प्रयोज्य । मान लीजिए कि आपके पास एक प्रोग्राम है जिसे डेटाबेस तक पहुंचने की आवश्यकता है, प्रोग्राम में लगभग सभी विंडो को डेटाबेस के साथ इंटरैक्ट करना होगा। इन विंडो के लिए अलग कोड लिखने के बजाय, आप एक फ़ंक्शन बना सकते हैं जो सभी डेटाबेस इंटरैक्शन को संभालता है। फिर आप इसे अपनी इच्छित विंडो से कॉल कर सकते हैं।
• Subroutines और फ़ंक्शन स्व-दस्तावेजीकरण हैं । मान लें कि आपके पास एक फ़ंक्शन कैलकुलेटनइंटरेस्ट है और एक और जो कनेक्टटैडबेस को कहता है। सबरूटीन / फ़ंक्शन के नाम को देखकर, प्रोग्रामर यह बता पाएगा कि प्रोग्राम क्या करता है।

सबरूटीन्स और कार्यों के नामकरण के नियम

सबरूटीन्स और फ़ंक्शंस का उपयोग करने के लिए, नियमों का एक सेट है जिसका पालन करना है।

• एक सबरूटीन या VBA कॉल फ़ंक्शन नाम में स्थान नहीं हो सकता
• एक एक्सेल वीबीए कॉल उप या फ़ंक्शन का नाम एक पत्र या अंडरस्कोर के साथ शुरू होना चाहिए। यह संख्या या विशेष वर्ण से शुरू नहीं हो सकता
• एक सबरूटीन या फ़ंक्शन नाम एक कीवर्ड नहीं हो सकता। एक कीवर्ड एक शब्द है जिसका VBA में विशेष अर्थ है। निजी, सब, फंक्शन, एंड एंड आदि शब्द कीवर्ड के सभी उदाहरण हैं। संकलक उन्हें विशिष्ट कार्यों के लिए उपयोग करता है।

वीबीए सबरूटीन सिंटेक्स

आपको इस उदाहरण के साथ एक्सेल में डेवलपर टैब को सक्षम करने की आवश्यकता होगी। यदि आप नहीं जानते कि डेवलपर टैब को कैसे सक्षम किया जाए तो VBA ऑपरेटर्स पर ट्यूटोरियल पढ़ें

सिंटैक्स में यहाँ,

Private Sub mySubRoutine(ByVal arg1 As String, ByVal arg2 As String)'do somethingEnd Sub

सिंटेक्स स्पष्टीकरण

कोड	कार्य
"निजी उप mySubRoutine (...)"	यहाँ "सब" शब्द का प्रयोग "मायसुबरटाइन" नामक सबरूटीन घोषित करने और सबरूटीन के शरीर को शुरू करने के लिए किया जाता है। कीवर्ड प्राइवेट का उपयोग सबरूटीन के दायरे को निर्दिष्ट करने के लिए किया जाता है
"ByVal arg1 स्ट्रिंग के रूप में, ByVal arg2 स्ट्रिंग के रूप में":	यह स्ट्रिंग डेटा प्रकार नाम arg1 और arg2 के दो मापदंडों की घोषणा करता है
"अंत उप"	"एंड सब" का उपयोग सबरूटीन के शरीर को समाप्त करने के लिए किया जाता है

निम्नलिखित सबरूटीन पहले और अंतिम नाम को स्वीकार करता है और उन्हें एक संदेश बॉक्स में प्रदर्शित करता है।

अब हम इस उप प्रक्रिया को प्रोग्राम और निष्पादित करने जा रहे हैं। इसे देखते हैं।

VBA में उप को कैसे कॉल करें

VBA में उप को कॉल करने के तरीके के बारे में नीचे दी गई एक स्टेप बाय स्टेप प्रक्रिया है:

1. उपयोगकर्ता इंटरफ़ेस डिज़ाइन करें और उपयोगकर्ता नियंत्रण के लिए गुण सेट करें।
2. सबरूटीन जोड़ें
3. सबरूटीन को कॉल करने वाले कमांड बटन के लिए क्लिक इवेंट कोड लिखें
4. आवेदन का परीक्षण करें

चरण 1) उपयोगकर्ता इंटरफ़ेस

नीचे दिए गए चित्र में दिखाए अनुसार उपयोगकर्ता इंटरफ़ेस डिज़ाइन करें

निम्नलिखित गुण सेट करें। जो गुण हम सेट कर रहे हैं

एस / एन	नियंत्रण	संपत्ति	मूल्य
1	कमांडबटन १	नाम	btnDisplayFullName
२		शीर्षक	फुलनाम सबरूटीन

आपका इंटरफ़ेस अब इस प्रकार दिखना चाहिए

चरण 2) सबरूटीन जोड़ें

1. कोड विंडो खोलने के लिए Alt + F11 दबाएं
2. निम्नलिखित सबरूटीन जोड़ें

Private Sub displayFullName(ByVal firstName As String, ByVal lastName As String)MsgBox firstName & " " & lastNameEnd Sub

यहाँ कोड में,

कोड	कार्रवाई
"निजी उप प्रदर्शन	यह एक निजी सबरूटीन डिस्प्लेफुलनाम घोषित करता है जो दो स्ट्रिंग मापदंडों को स्वीकार करता है।
"स्ट्रिंग के रूप में बायल फर्स्टनाम, स्ट्रिंग के रूप में बायवाल अंतिम नाम	यह दो पैरामीटर चर को पहले नाम और अंतिम नाम घोषित करता है
MsgBox पहले नाम और "" और अंतिम नाम "	यह एक संदेश बॉक्स प्रदर्शित करने के लिए MsgBox अंतर्निहित फ़ंक्शन को कॉल करता है। यह तब पैरामीटर के रूप में 'फर्स्टनाम' और 'लास्टनाम' वेरिएबल्स पास करता है। एम्परसेंड "और" का उपयोग दो चर को समेटने और उनके बीच एक खाली स्थान जोड़ने के लिए किया जाता है।

चरण 3) कमांड बटन क्लिक इवेंट से सबरूटिन को कॉल करना।

• नीचे दिए गए चित्र में दिखाए अनुसार कमांड बटन पर राइट क्लिक करें। देखें कोड का चयन करें।
• कोड एडिटर खुल जाएगा

BtnDisplayFullName कमांड बटन के क्लिक इवेंट के लिए कोड संपादक में निम्न कोड जोड़ें।

Private Sub btnDisplayFullName_Click()displayFullName "John", "Doe"End Sub

आपकी कोड विंडो अब इस प्रकार दिखनी चाहिए

परिवर्तनों को सहेजें और कोड विंडो बंद करें।

चरण 4) कोड का परीक्षण करना

डेवलपर टूलबार पर डिज़ाइन मोड को 'ऑफ' करें। नीचे के रूप में।

चरण 5) कमांड बटन पर क्लिक करें 'FullName Subroutine'।

आपको निम्न परिणाम मिलेंगे

उपरोक्त एक्सेल कोड डाउनलोड करें

सारांश:

• एक सबरूटीन कोड का एक टुकड़ा है जो एक विशिष्ट कार्य करता है। निष्पादन के बाद एक सबरूटीन एक मान नहीं लौटाता है
• सबरूटीन्स कोड पुन: प्रयोज्य प्रदान करते हैं
• Subroutines छोटे प्रबंधनीय कोड में कोड के बड़े हिस्से को तोड़ने में मदद करते हैं।