यह ट्यूटोरियल प्रदर्शित करेगा कि VBA में UCASE, LCASE और STCONV फ़ंक्शंस का उपयोग कैसे करें।
वीबीए में काम करते समय, आपको अक्सर स्ट्रिंग्स को लोअरकेस, अपरकेस या उचित केस में बदलने की आवश्यकता होती है। यह का उपयोग करके संभव हैयूकेस, एलकेस तथा StrConv कार्य।
VBA में स्ट्रिंग्स में हेरफेर करते समय ये कार्य महत्वपूर्ण हैं, क्योंकि VBA है अक्षर संवेदनशील. यदि आप VBA केस-संवेदी बनाना चाहते हैं, तो आपको O . जोड़ना होगापाठ की तुलना करें अपने मॉड्यूल के शीर्ष पर। आप इसके बारे में यहाँ और अधिक जानकारी प्राप्त कर सकते हैं: VBA केस सेंसिटिव रोकें
UCase - स्ट्रिंग को अपर केस में बदलें
NS यूकेस वीबीए में फ़ंक्शन एक स्ट्रिंग के सभी अक्षरों को अपरकेस में परिवर्तित करता है। केवल एक तर्क है, जो एक स्ट्रिंग, स्ट्रिंग के साथ चर या सेल मान हो सकता है। यदि आप दो स्ट्रिंग्स की तुलना करना चाहते हैं तो अक्सर इस फ़ंक्शन का उपयोग किया जाता है। यहाँ UCase फ़ंक्शन के लिए कोड है:
| 12345678 | स्ट्रिंग के रूप में मंद strTextस्ट्रिंग के रूप में मंद strTextUCasestrText = "अपरकेस फ़ंक्शन चल रहा है"strTextUCase = UCase (strText)MsgBox strTextUCase |
उदाहरण में, हम के सभी अक्षरों को परिवर्तित करना चाहते हैं स्ट्रेटटेक्स्ट ऊपरी मामले में चर और परिवर्तित स्ट्रिंग को असाइन करें स्ट्रटेक्स्टयूकेस चर। अंत में हम संदेश बॉक्स को परिवर्तित स्ट्रिंग के साथ कहते हैं:
LCase - स्ट्रिंग को लोअर केस में बदलें
यदि आप एक स्ट्रिंग के सभी अक्षरों को छोटे अक्षरों में बदलना चाहते हैं, तो आपको इसका उपयोग करने की आवश्यकता है एलकेस समारोह। इस फ़ंक्शन में एक तर्क है, जो UCase के समान है। यह LCase फ़ंक्शन के लिए कोड है:
| 12345678 | स्ट्रिंग के रूप में मंद strTextस्ट्रिंग के रूप में मंद strTextLCasestrText = "लोअरकेस फंक्शन चल रहा है"strTextLCase = LCase (strText)MsgBox strTextLCase |
इस उदाहरण में, हम स्ट्रिंग के सभी अक्षरों को A1 से लोअर केस में बदलते हैं। उसके बाद, परिवर्तित स्ट्रिंग को सेल A1 को सौंपा गया है।
StrConv - स्ट्रिंग को उचित केस में बदलें
NS StrConv फ़ंक्शन आपको टेक्स्ट की एक स्ट्रिंग को उचित केस में बदलने में सक्षम बनाता है। फ़ंक्शन में दो तर्क हैं। सबसे पहले वह स्ट्रिंग है जिसे आप कनवर्ट करना चाहते हैं। दूसरा रूपांतरण का प्रकार है जो आप चाहते हैं। एक स्ट्रिंग को एक उचित मामले में बदलने के लिए, आपको इसे सेट करने की आवश्यकता है वीबीप्रॉपरकेस. फ़ंक्शन के लिए कोड है:
| 12345678 | स्ट्रिंग के रूप में मंद strTextस्ट्रिंग के रूप में मंद strTextProperCasestrText = "उचित केस फ़ंक्शन चलाना"strTextProperCase = StrConv (strText, vbProperCase)MsgBox strTextProperCase |
आप उदाहरण पर देखेंगे कि फ़ंक्शन कैसे काम करता है। यह सेल बी 1 से स्ट्रिंग लेता है, इसे उचित मामले में परिवर्तित करता है और सेल ए 1 में मान देता है।
StrConv - स्ट्रिंग को अपर या लोअर केस में बदलें
StrConv फ़ंक्शन का उपयोग करके, आप एक स्ट्रिंग को ऊपरी या निचले मामलों में भी बदल सकते हैं। ऐसा करने के लिए, आपको बस दूसरा तर्क vbUpperCase या vbLowerCase पर सेट करने की आवश्यकता है:
| 1 | strTextConverted = StrConv (strText, vbUpperCase) |
| 1 | strTextConverted = StrConv (strText, vbLowerCase) |
VBA अपर, लोअर और प्रॉपर केस - एक्सेस में केस फंक्शन्स
उपरोक्त सभी उदाहरण एक्सेस वीबीए में ठीक उसी तरह काम करते हैं जैसे एक्सेल वीबीए में।
| 1234 | निजी उप क्लाइंटनाम_आफ्टरअपडेट ()'यह क्लाइंट नाम बॉक्स में टेक्स्ट को अपरकेस में बदल देगाMe.ClientName = UCase(Me.ClientName)अंत उप |
