यह ट्यूटोरियल आपको सिखाएगा कि कैसे वीबीए में एक उप प्रक्रिया से फ़ंक्शन को कॉल करें।
जब आप VBA में कोई फ़ंक्शन बनाते हैं, तो आप या तो अपनी Excel कार्यपुस्तिका में फ़ंक्शन को UDF (उपयोगकर्ता परिभाषित फ़ंक्शन) के रूप में उपयोग कर सकते हैं, या आप इसे उप प्रक्रिया से कॉल कर सकते हैं।
उप प्रक्रिया से किसी फ़ंक्शन को कॉल करना
एक बार जब आप कोई फ़ंक्शन बना लेते हैं, तो आप फ़ंक्शन को कॉल करने के लिए उप प्रक्रिया का उपयोग करके इसे अपने कोड में कहीं से भी कॉल कर सकते हैं।
नीचे दिए गए फ़ंक्शन पर विचार करें:
| 123 | फ़ंक्शन GetValue () पूर्णांक के रूप मेंगेटवैल्यू = 50अंत समारोह |
क्योंकि फ़ंक्शन एक मान लौटाते हैं, फ़ंक्शन को कॉल करने के लिए, हमें किसी चीज़ को मान पास करना होगा। इस मामले में हम मान को एक चर में पास करेंगे:
| 123456789 | उप परीक्षण मान ()डिम इंटवैल अस इंटीजर'गेटवैल्यू फ़ंक्शन चलाएँ'इंटवैल = गेटवैल्यू ()'और मूल्य दिखाएंMsgBox intValअंत उप |
पैरामीटर के साथ एक फ़ंक्शन को कॉल करना
यदि फ़ंक्शन में पैरामीटर हैं, तो आपको सही मान वापस पाने के लिए इन मापदंडों को उप प्रक्रिया से फ़ंक्शन में पास करना होगा।
| 123 | फ़ंक्शन GetValue (इंटीजर के रूप में intA) पूर्णांक के रूप मेंगेटवैल्यू = इंटए * 5अंत समारोह |
इस फ़ंक्शन को कॉल करने के लिए, हम निम्नलिखित उप प्रक्रिया चला सकते हैं।
| 123 | उप परीक्षण मान ()MsgBox GetValue(10)अंत उप |
यह सब प्रोसीजर फंक्शन को 10 का मान भेजेगा, जो बदले में उस वैल्यू को 5 से गुणा करेगा और सब प्रोसीजर को मान 50 पर वापस कर देगा।
