VBA StrConv फ़ंक्शन (उदाहरण) - StrConv का उपयोग कैसे करें?

एक्सेल VBA StrConv फ़ंक्शन

VBA में StrConv फ़ंक्शन को स्ट्रिंग फ़ंक्शंस के अंतर्गत वर्गीकृत किया गया है जो एक रूपांतरण फ़ंक्शन है, इस फ़ंक्शन का उपयोग यह है कि यह डेवलपर द्वारा प्रदान किए गए इनपुट के साथ स्ट्रिंग के मामले को बदलता है, इस फ़ंक्शन के तर्क स्ट्रिंग और केस के लिए इनपुट हैं 1 की तरह स्ट्रिंग को लोअरकेस में बदलने के लिए।

StrConv "स्ट्रिंग रूपांतरण" के लिए खड़ा है इस VBA फ़ंक्शन का उपयोग करके, हम आपूर्ति किए गए स्ट्रिंग को निर्दिष्ट प्रारूप में बदल सकते हैं। एक बात जो आपको यहाँ समझने की ज़रूरत है, वह यह है कि हम इस सूत्र का उपयोग केवल VBA फ़ंक्शन के रूप में कर सकते हैं, एक्सेल वर्कशीट फ़ंक्शन के रूप में नहीं। इस लेख में, हम " VBA StrConv " फॉर्मूला के संपूर्ण विस्तृत उदाहरणों का दौरा करेंगे ।

ठीक है, StrConv फ़ंक्शन के सिंटैक्स को देखें

स्ट्रिंग: यह और कुछ नहीं बल्कि वह पाठ है जिसे हम बदलने की कोशिश कर रहे हैं।

रूपांतरण: हमें किस प्रकार के रूपांतरण की आवश्यकता है। हमारे पास यहां विभिन्न प्रकार के विकल्प हैं, नीचे रूपांतरणों की सूची है जो हम प्रदर्शन कर सकते हैं।

  • vbUpperCase या 1: यह विकल्प प्रदत्त पाठ मान को ऊपरी केस वर्ण में परिवर्तित करता है । यह UCASE फ़ंक्शन के समान कार्य करता है। उदाहरण के लिए, यदि आप "एक्सेल" शब्द की आपूर्ति करते हैं, तो यह "एक्सेल" में बदल जाएगा।
  • vbLowerCase या 2: यह विकल्प एक्सेल में लोअर केस कैरेक्टर को दिए गए टेक्स्ट वैल्यू को कनवर्ट करता है । यह LCASE फ़ंक्शन के समान कार्य करता है। उदाहरण के लिए, यदि आप "एक्सेल" शब्द की आपूर्ति करते हैं, तो यह "एक्सेल" में बदल जाएगा।
  • vbProperCase या 3: यह विकल्प प्रदत्त पाठ मान को उचित स्थिति वर्ण में परिवर्तित करता है । शब्द का हर पहला वर्ण ऊपरी मामले में बदल जाता है, और शेष सभी अक्षर निचले मामले में बदल जाते हैं। उदाहरण के लिए, यदि आप "एक्सेल" शब्द की आपूर्ति करते हैं, तो यह "एक्सेल" में बदल जाएगा।
  • vbUniCode या 64: यह विकल्प स्ट्रिंग को यूनिकोड कोड में परिवर्तित करता है।
  • vbFromUnicode या 128: यह स्ट्रिंग यूनिकोड को डिफ़ॉल्ट सिस्टम कोड में परिवर्तित करता है।

भले ही हमारे पास ऊपर रूपांतरण रूपांतरण के साथ कई अन्य विकल्प हैं, तीन हमारे लिए पर्याप्त हैं।

LCID: यह लोकेल आईडी है। डिफ़ॉल्ट रूप से, यह सिस्टम आईडी लेता है। यह 99% समय का उपयोग नहीं करेगा।

VBA में StrConv फ़ंक्शन के उदाहरण

उदाहरण 1

अब स्ट्रिंग को UPPER CASE वर्ण में परिवर्तित करने के उदाहरण पर एक नज़र डालें। मैं यहाँ “Excel VBA” शब्द का उपयोग कर रहा हूँ। नीचे VBA कोड है।

कोड:

उप StrConv_Example1 () मंद पाठ परिणाम के रूप में स्ट्रिंग पाठ परिणाम के रूप में मंद परिणाम

यह स्ट्रिंग "एक्सेल VBA" को ऊपरी मामले में बदल देगा।

इस कोड को F5 कुंजी या मैन्युअल रूप से चलाएं और उसी का परिणाम देखें।

उदाहरण # 2

अब लोअर केस कन्वर्सेशन के साथ उसी स्ट्रिंग को देखें। नीचे कोड है।

कोड:

Sub StrConv_Example2 () डिम TextValues ​​स्ट्रिंग डिम रिजल्ट के रूप में String TextValues ​​= "एक्सेल vba" रिजल्ट = StrConv (TextValues, vbLowerCase) MsbBox Result End Sub

यह स्ट्रिंग "एक्सेल VBA" को एक निचले मामले में बदल देगा।

आप मैन्युअल रूप से या एक्सेल शॉर्टकट कुंजी F5 के माध्यम से चला सकते हैं। नीचे उसी का परिणाम है।

उदाहरण # 3

अब एक ही स्ट्रिंग को उचित केस रूपांतरण के साथ देखें। नीचे कोड है।

कोड:

उप StrConv_Example3 () पाठ के रूप में डिम टेक्स्टवैल्यू स्ट्रिंग स्ट्रिंग टेक्स्टवैल्यूज = "एक्सेल vba" परिणाम के रूप में = StrConv (TextValues, vbProperCase) MsbBox परिणाम अंत उप

यह स्ट्रिंग "एक्सेल VBA" को एक उचित मामले में बदल देगा। स्ट्रिंग का प्रत्येक पहला अक्षर ऊपरी मामला है, और अंतरिक्ष के बाद प्रत्येक अक्षर भी ऊपरी मामले में बदल जाता है, और शेष सभी अक्षर निचले मामले में परिवर्तित हो जाएंगे। नीचे उसी का परिणाम है।

उदाहरण # 4

अब एक नजर यूनिकोड चरित्र के उदाहरण पर डालते हैं। नीचे दिए गए कोड को देखें।

कोड:

उप StrConv_Example4 () डिम i अस लॉन्ग डिम x () बाइट x = StrConv ("ExcelVBA", vbFromUnicode) के लिए i = 0 से UBound (x) डिबग। Xint (i) अगला अंत उप

यह सभी यूनिकोड वर्णों को तत्काल विंडो पर प्रिंट करेगा।

ASCII कोड में, "E" यूनिकोड 69 है, "x" यूनिकोड 120 है, और इसी तरह। इस तरह, VBA StrConv का उपयोग करके, हम स्ट्रिंग को यूनिकोड में बदल सकते हैं।

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