यह संक्षिप्त ट्यूटोरियल प्रदर्शित करेगा कि स्ट्रिंग को वीबीए में एक तिथि में कैसे परिवर्तित किया जाए।
एक्सेल में तिथियों को संख्याओं के रूप में संग्रहीत किया जाता है, और फिर दिनांक के रूप में दिखाने के लिए स्वरूपित किया जाता है। एक्सेल की दुनिया में पहला दिन 1 जनवरी 1900 (विंडोज डिफॉल्ट) या 1 जनवरी 1904 (मैकिंटोश डिफॉल्ट) था - जिसका अर्थ है कि 5 अगस्त 2022 1 जनवरी 1900 से 44413 दिन है। एक स्ट्रिंग को एक्सेल में एक तारीख में बदलने के लिए , हमें पहले स्ट्रिंग को एक संख्या में बदलना होगा, और फिर उस संख्या को तिथि में बदलना होगा।
सीडीएटी फंक्शन
हम एक स्ट्रिंग को एक तिथि में बदलने के लिए वीबीए में सीडीएटी नामक फ़ंक्शन का उपयोग कर सकते हैं।
1234567 | उप कन्वर्टडेट ()सिंगल के रूप में डिम डीटीईस्ट्रिंग के रूप में मंद strDस्ट्रड = "05/10/2020"डीटीई = सीडीएटी (strD)संदेशबॉक्स डीटीईअंत उप |
जैसा कि हमने एक संख्यात्मक चर (dte as Single) घोषित किया है, msgbox वह नंबर लौटाएगा जो दर्ज की गई तारीख को संदर्भित करता है।
यह महत्वपूर्ण है कि हम वर्ष के सभी 4 अंकों (यानी 2022 और न केवल 20) का उपयोग करके वर्ष दर्ज करें, अन्यथा लौटाई गई संख्या अपेक्षा के अनुरूप नहीं हो सकती है। एक्सेल तिथि के वर्ष भाग की व्याख्या नहीं करता है - यह हमारे पीसी के कंट्रोल पैनल द्वारा नियंत्रित किया जाता है।
हालाँकि, यदि हम वेरिएबल को दिनांक चर के रूप में घोषित करते हैं, तो संदेश बॉक्स दिनांक में परिवर्तित संख्या को वापस कर देगा।
1234567 | उप कन्वर्टडेट ()मंद दिनांक के रूप में दिनांकस्ट्रिंग के रूप में मंद strDस्ट्रड = "05/10/2020"डीटीई = सीडीएटी (एसटीडी)संदेशबॉक्स डीटीईअंत उप |
हम इसे एक कदम आगे ले जा सकते हैं और तारीख को उस तारीख के प्रारूप के रूप में प्रारूपित कर सकते हैं जिसे हम देखना चाहते हैं।
1234567 | उप कन्वर्टडेट ()स्ट्रिंग के रूप में मंद डीटीस्ट्रिंग के रूप में मंद strDस्ट्रड = "05/10/2020"dte = फ़ॉर्मेट (CDate (strD), "dd mmmm yyyy")संदेशबॉक्स डीटीईअंत उप |
इस उदाहरण में, हम स्ट्रिंग को एक तिथि में परिवर्तित कर रहे हैं, और फिर वापस एक स्ट्रिंग में बदल रहे हैं!
यदि हम वर्ष को पूरी तरह से छोड़ देते हैं, तो एक्सेल चालू वर्ष मान लेता है।