यह ट्यूटोरियल प्रदर्शित करेगा कि वीबीए में टेक्स्ट फंक्शन का उपयोग कैसे करें।
एक निर्दिष्ट प्रारूप में स्ट्रिंग के एक हिस्से को वापस करने के लिए एक्सेल वर्कशीट में टेक्स्ट फ़ंक्शन का उपयोग किया जाता है। टेक्स्ट फ़ंक्शन एक वीबीए फ़ंक्शन नहीं है, लेकिन वर्कशीट फ़ंक्शन ऑब्जेक्ट को संदर्भित करके वीबीए में उपयोग किया जा सकता है।
वर्कशीट फंक्शन। टेक्स्ट
इसलिए VBA में वाक्य रचना इस प्रकार होगी:
= वर्कशीट फंक्शन। टेक्स्ट (Arg1, Arg2)
जहां Arg1 मूल स्ट्रिंग है और Arg2 उस स्ट्रिंग का प्रारूप है जिसे हम वापस करना चाहते हैं।
1234567 | सब टेस्ट डब्ल्यूएसएफफंक्शन ()स्ट्रिंग के रूप में मंद डीटीस्ट्रिंग के रूप में मंद strDडीटीई = "08/05/2021"strD= वर्कशीटफंक्शन। टेक्स्ट (डीटीई, "एमएमएमएम")संदेशबॉक्स strDअंत उप |
उपरोक्त उदाहरण में, स्ट्रिंग वेरिएबल dte एक तारीख को स्टोर कर रहा है। टेक्स्ट फ़ंक्शन तब दिनांक का महीना भाग लौटाता है।
टेक्स्ट फ़ंक्शन के साथ स्वरूपण संख्या
हम अपने वीबीए कोड में संख्याओं को प्रारूपित करने के लिए टेक्स्ट फ़ंक्शन का उपयोग कर सकते हैं।
1234567 | उप प्रारूप मुद्रा ()स्ट्रिंग के रूप में मंद strNumस्ट्रिंग के रूप में मंद strFormatस्ट्रनम = "75896.125"strFormat = वर्कशीटफंक्शन। टेक्स्ट (strNum, "$#,##0.00")MsgBox strFormatअंत उप |
उपरोक्त उदाहरण में लौटाई गई स्ट्रिंग $75,896.13 होगी।
टेक्स्ट फ़ंक्शन का उपयोग करके संख्या स्वरूपण के अन्य उदाहरण हैं:
12345678 | = वर्कशीट फंक्शन। टेक्स्ट (75896.125, "0")यह वापस आ जाएगा: "७५८९६"= वर्कशीट फंक्शन। टेक्स्ट (75896.125, "0.0")यह वापस आ जाएगा: "75896.1"= वर्कशीट फंक्शन। टेक्स्ट (75896.125, "#, ## 0")यह वापस आ जाएगा: "75,896" |
हालाँकि, एक्सेल में एक अंतर्निहित VBA फ़ंक्शन है जिसे हम टेक्स्ट फ़ंक्शन के बजाय उपयोग कर सकते हैं यदि हम VBA के भीतर दिनांक और संख्याओं को प्रारूपित करना चाहते हैं। इसे फ़ॉर्मेट फ़ंक्शन के रूप में जाना जाता है।
वीबीए प्रारूप समारोह
ऊपर दिए गए उदाहरण को लेते हुए, WorksheetFunction.Text का उपयोग करने के बजाय, हम समान परिणाम प्राप्त करने के लिए केवल Format Function का उपयोग कर सकते हैं।
12345678 | = प्रारूप (75896.125, "0")यह वापस आ जाएगा: "७५८९६"=फ़ॉर्मेट(75896.125, "0.0")यह वापस आ जाएगा: "75896.1"=फ़ॉर्मेट(75896.125, "#,##0")यह वापस आ जाएगा: "75,896" |
इसी तरह, हम किसी स्ट्रिंग के दिनांक भागों को प्रारूपित करने के लिए फ़ॉर्मेट फ़ंक्शन का उपयोग कर सकते हैं।
1234567 | सब टेस्टफॉर्मैटफंक्शन ()स्ट्रिंग के रूप में मंद डीटीस्ट्रिंग के रूप में मंद strDडीटीई = "08/05/2021"strD = प्रारूप (डीटीई, "एमएमएमएम")संदेशबॉक्स strDअंत उप |