VBA CDBL फ़ंक्शन - डबल डेटा प्रकार के लिए मूल्य कैसे बदलें?

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

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

VBA में, "CDBL" का अर्थ "डबल में कनवर्ट करें" है। यह फ़ंक्शन दिए गए नंबर को डबल डेटा प्रकार में कनवर्ट करता है। CDBL फ़ंक्शन के सिंटैक्स पर एक नज़र डालें।

  • अभिव्यक्ति वह मूल्य है जिसे हम डबल डेटा प्रकार में बदलने की कोशिश कर रहे हैं।

कोई भी फ़्लोटिंग संख्या जो डबल डेटा प्रकार के अलावा अन्य के रूप में संग्रहीत है, सीडीबीएल फ़ंक्शन को लागू करके परिवर्तित किया जा सकता है।

यहाँ याद करने के लिए इंगित करें: केवल संख्यात्मक मानों को डबल डेटा प्रकार में परिवर्तित किया जा सकता है। संख्यात्मक मान के अलावा कुछ भी डबल प्रकार में परिवर्तित नहीं किया जा सकता है, इसलिए नीचे की तरह "VBA में टाइप मिसमैच त्रुटि" दिखाते हुए समाप्त करें।

क्या आपने कभी VBA कोडिंग में डबल डेटा प्रकार का उपयोग किया है?

यदि नहीं, तो अब इस पर ध्यान देने योग्य है। डबल वह डेटा प्रकार है जिसका उपयोग संख्या की दशमलव स्थिति को संग्रहीत करने के लिए किया जाता है। हमारे पास 13 अस्थायी दशमलव संख्याएँ हो सकती हैं।

उदाहरण के लिए, नीचे दिए गए VBA कोड को देखें।

उपरोक्त में, मैंने चर (k) प्रकार को पूर्णांक के रूप में परिभाषित किया है। Dim k As Integer

अगला, मैंने k = 25.4561248694615 के रूप में मान असाइन किया है

जब मैं कोड चलाऊंगा, तो हमें परिणाम निम्नानुसार मिलेगा।

हमें 25 के रूप में परिणाम मिला क्योंकि हमने चर को पूर्णांक मान के निकटतम पूर्णांक मान के रूप में परिभाषित किया है।

परिणाम को दिखाने के लिए जैसा कि है, हमें इंटेगर से चर प्रकार को डबल में बदलने की आवश्यकता है।

जैसा कि हमने चर को सौंपा है, यह हमें सटीक संख्या देना चाहिए।

ठीक है, इसे ध्यान में रखते हुए, हम उन सभी अंश संख्याओं को भी परिवर्तित कर सकते हैं, जो गैर-डबल डेटा प्रकार के रूप में स्टोर हैं।

VBA CDBL फ़ंक्शन का उपयोग करने के उदाहरण

उदाहरण 1

कार्यवाही शुरू करने के लिए, आइए नीचे दिए गए कोड को देखें।

कोड:

Sub Double_Example1 () डिम के रूप में स्ट्रिंग k = 48.14869569 MsgBox k End Sub

अब मैं कोड चलाऊंगा और देखूंगा कि क्या होता है।

भले ही VBA वैरिएबल प्रकार "स्ट्रिंग" है, यह अभी भी दशमलव मान दिखा रहा है। ऐसा इसलिए है क्योंकि स्ट्रिंग किसी भी प्रकार के डेटा प्रकार की हो सकती है, इसलिए दशमलव या फ्लोटिंग संख्याएँ वैसी ही दिखाई दे रही हैं जैसी वह हैं।

अब मैं vba data type को string से Integer में बदलूँगा।

कोड:

Sub Double_Example1 () Dim k As Integer k = 48.14869569 MsgBox k End Sub

अब मैं कोड चलाऊंगा और देखूंगा कि क्या होता है।

यह वह जगह है जहां सीडीबीएल फ़ंक्शन पूर्णांक डेटा प्रकार को डबल में परिवर्तित करने में महत्वपूर्ण भूमिका निभाता है। तो नीचे कोड आपके लिए समान है।

कोड:

उप Double_Example1 () मंद IntegerNumber स्ट्रिंग के रूप में Dim DoubleNumber डबल पूर्णांक के रूप में = 48.14869569 DoubleNumber = CDbl (IntegerNumber) MsgBox DoubleNumber समाप्ति उप

यह स्ट्रिंग डेटा प्रकार के मूल्य को डबल में बदल देगा।

उदाहरण # 2

अब हम संख्या .6५४.६ ९ ४, को रूपांतरित करते हैं, जिसे वेरिएंट के रूप में डबल डेटा प्रकार में संग्रहीत किया जाता है।

कोड:

उप Double_Example2 () डिम VaraintNumber डिम DoubleNumber डबल VaraintNumber = 854.6947 DoubleNumber = CDbl (VaraintNumber) MsgBox DoubleNumber End Sub

पहले वेरिएबल को मैंने "वेरिएंट" घोषित किया है। मंद वर्तननंबर

नोट: जब चर प्रकार घोषित नहीं किया जाता है, तो यह एक सार्वभौमिक डेटा प्रकार वेरिएंट बन जाता है।

इसके बाद, मैंने एक और चर, यानी, डबल डबलनंबर एज़ डबल घोषित किया है ।

पहले चर के लिए, VaraintNumber, हमने 854.6947 के रूप में मान असाइन किया है।

अब दूसरे चर का उपयोग करके, हमने वेरिएबल मान को डबल डेटा प्रकार में बदलने के लिए सीडीबीएल फ़ंक्शन लागू किया है।

DoubleNumber = CDbl (VaraintNumber)

अंतिम भाग संदेश बॉक्स में परिणाम दिखाना है। MsgBox DoubleNumber

अब मैं परिणाम देखने के लिए कोड चलाऊंगा।

याद रखने वाली चीज़ें

  • एक डबल डेटा प्रकार केवल संख्यात्मक संख्या को स्वीकार कर सकता है।
  • यदि पाठ मान की आपूर्ति की जाती है, तो यह टाइप मिसमैच की त्रुटि का कारण होगा।
  • एक डबल डेटा प्रकार केवल 13 अंकों की फ़्लोटिंग संख्या प्रदर्शित कर सकता है।

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