यह ट्यूटोरियल प्रदर्शित करेगा कि किसी व्यंजक को लंबे पूर्णांक डेटा प्रकार में बदलने के लिए CLng VBA फ़ंक्शन का उपयोग कैसे करें।
सीएलएनजी समारोह
VBA CLng एक्सप्रेशन को लॉन्ग में बदलें
VBA CLng फ़ंक्शन का उपयोग VBA कोड के अंदर अभिव्यक्तियों को लंबे डेटा प्रकार में बदलने के लिए किया जा सकता है।
123456 | उप CLngउदाहरण_1()MsgBox CLng(12.34) 'परिणाम है: 12MsgBox CLng(12.345) 'परिणाम है: 12MsgBox CLng(-124) 'परिणाम है: -124MsgBox CLng(-12.34) 'परिणाम है: -12अंत उप |
वीबीए सीएलएनजी राउंडिंग
VBA CLng फ़ंक्शन किसी संख्या प्रकार या संख्या जैसे व्यंजक के दशमलव भाग को गोल करेगा। हालांकि, यह सभी मामलों में सही ढंग से गोल नहीं होता है। जब दशमलव भाग 0.5 होता है तो VBA CLng फ़ंक्शन निकटतम सम पूर्णांक देता है।
1234567891011 | उप CLngउदाहरण_2()MsgBox CLng(0.34) 'परिणाम है: 0MsgBox CLng(0.99) 'परिणाम है: 1MsgBox CLng(-124.95) 'परिणाम है: -125MsgBox CLng(1.5) 'परिणाम है: 2MsgBox CLng(2.5) 'परिणाम है: 2अंत उप |
वीबीए सीएलएनजी फ़ंक्शन के व्यवहार को अपेक्षित में बदलने के लिए हम अपने अपेक्षित दशमलव मान में अपेक्षाकृत छोटा दशमलव संख्या जोड़ सकते हैं।
1234567891011 | उप CLngExample_3()संदेशबॉक्स सीएलएनजी(2.5)'परिणाम है: 2MsgBox CLng(2.5 + 0.001)'परिणाम है: 3संदेशबॉक्स सीएलएनजी(१४.५)'परिणाम है: 14MsgBox CLng(१४.५ + ०.००१)'परिणाम है: 15अंत उप |
वीबीए प्रोग्रामिंग | कोड जेनरेटर आपके लिए काम करता है!
VBA CLng स्ट्रिंग्स को लॉन्ग में कनवर्ट करना
VBA CLng फ़ंक्शन का उपयोग स्ट्रिंग्स को लॉन्ग में बदलने के लिए किया जा सकता है यदि स्ट्रिंग में वर्णों का अर्थ संख्याओं के रूप में है।
123456789101112131415161718 | उप CLngExample_4()स्ट्रिंग के रूप में डिम स्ट्रेक्सस्ट्रेक्स = "112"MsgBox CLng (StrEx)'परिणाम है: 112स्ट्रेक्स = "112.3"MsgBox CLng (StrEx)'परिणाम है: 112 112.3 गोल है'स्ट्रेक्स = "11,2"MsgBox CLng (StrEx)'परिणाम है: 112, अनदेखा किया जाता हैस्ट्रेक्स = "$112"MsgBox CLng (StrEx)'परिणाम है: 112 $ पर ध्यान नहीं दिया गया'अंत उप |
VBA CLng रन-टाइम त्रुटि 13 प्रकार बेमेल:
गैर-संख्यात्मक वर्णों वाले स्ट्रिंग्स के साथ VBA CLng फ़ंक्शन का उपयोग करना या ऐसे वर्ण जिनका संख्यात्मक संदर्भ में कोई अर्थ नहीं है, एक रन-टाइम त्रुटि '13' का परिणाम देगा: बेमेल टाइप करें।
1234567 | उप CLngExample_5()'नीचे दिए गए कोड के परिणामस्वरूप एक त्रुटि संदेश होगा''CLng गैर-संख्यात्मक वर्णों को संभाल नहीं सकता'स्ट्रिंग के रूप में डिम स्ट्रेक्सस्ट्रेक्स = "एबी13"MsgBox CLng (StrEx)अंत उप |
वीबीए सीएलएनजी रन-टाइम त्रुटि 6 ओवरफ्लो
स्ट्रिंग्स के साथ VBA CLng फ़ंक्शन का उपयोग करना जिसके परिणामस्वरूप मान अपेक्षित पूर्णांक से छोटा या बड़ा होता है, जिसके परिणामस्वरूप रन-टाइम त्रुटि '6': ओवरफ़्लो होगी। एक्सेल में पूर्णांक डेटा प्रकार का अपेक्षित मूल्य -2,147,483,648 से 2,147,483,647 है।
1234567 | उप CLngExample_6()'नीचे दिए गए कोड के परिणामस्वरूप एक त्रुटि संदेश होगा''CLng गैर-संख्यात्मक वर्णों को संभाल नहीं सकता'स्ट्रिंग के रूप में डिम स्ट्रेक्सस्ट्रेक्स = "२१४७४८३६४८"MsgBox CLng (StrEx)अंत उप |
VBA कोड उदाहरण खोज कर थक गए हैं? ऑटोमैक्रो का प्रयास करें!
वीबीए सीएलएनजी क्षेत्रीय सेटिंग्स
वीबीए सीएलएनजी फ़ंक्शन में कॉमा या डॉट के साथ स्ट्रिंग्स को परिवर्तित करने वाला अलग व्यवहार होता है। यह दशमलव विभाजक और अंक विभाजक के लिए ऑपरेटिंग सिस्टम की क्षेत्रीय सेटिंग्स का उपयोग करता है।
12345678910111213141516 | उप CLngExample_7()स्ट्रिंग के रूप में डिम स्ट्रेक्सस्ट्रेक्स = "1,9"MsgBox CLng (StrEx)'यदि क्षेत्रीय सेटिंग्स में समूह विभाजक के रूप में है तो''परिणाम है: 19'यदि क्षेत्रीय सेटिंग्स में , दशमलव विभाजक के रूप में है तो'परिणाम है: 2 (2 क्योंकि 1.9 गोल हो जाता है)स्ट्रेक्स = "1.9"MsgBox CLng (StrEx)'यदि क्षेत्रीय सेटिंग्स में . तब एक समूह विभाजक के रूप में'परिणाम है: 19'यदि क्षेत्रीय सेटिंग्स में . दशमलव विभाजक के रूप में तब'परिणाम है: 2 (2 क्योंकि 1.9 गोल हो जाता है)अंत उप |
वीबीए प्रोग्रामिंग | कोड जेनरेटर आपके लिए काम करता है!
VBA CLng बूलियन्स को लॉन्ग में कनवर्ट करना
वीबीए सीएलएनजी फ़ंक्शन बूलियन चर को लंबे समय तक परिवर्तित कर सकता है। यदि मूल्यांकित अभिव्यक्ति सत्य है तो परिणामी लंबा -1 है और यदि मूल्यांकन किया गया अभिव्यक्ति गलत है तो परिणामी लंबा 0 है।
1234567891011121314 | उप CLngExample_8()बूलियन के रूप में मंद बूलेक्सबूलएक्स = ट्रूसंदेशबॉक्स सीएलएनजी (बूलएक्स)'परिणाम है: -1संदेशबॉक्स सीएलएनजी(2 = 2)'परिणाम है: -1बूलएक्स = गलतसंदेशबॉक्स सीएलएनजी (बूलएक्स)'परिणाम है: 0संदेशबॉक्स सीएलएनजी(1 = 2)'परिणाम है: 0अंत उप |
VBA CLng दिनांकों को Longs में परिवर्तित कर रहा है
VBA CLng फ़ंक्शन दिनांक चर को लंबे समय में परिवर्तित कर सकता है। लौटाया गया मान वह आंतरिक संख्या है जिसका उपयोग एक्सेल द्वारा दिनांक भंडारण को गोल करने के लिए किया जाता है। यदि वह संख्या VBA के लिए अपेक्षित लंबी सीमा से बाहर है तो हमें एक रन-टाइम त्रुटि '6' मिलती है: अतिप्रवाह।
123456789101112 | उप CLngExample_9()मंद दिनांकपूर्व तिथि के रूप मेंडेटएक्स = #2/3/1940#MsgBox CLng(DateEx)'परिणाम है: 14644डेटएक्स = #8/7/1964#MsgBox CLng(DateEx)'परिणाम है: 23596डेटएक्स = #3/7/1934 11:32:04 पूर्वाह्न#MsgBox CLng(DateEx)'परिणाम है: 12485अंत उप |