VBA में प्रारूप फ़ंक्शन का उपयोग वांछित प्रारूप में दिए गए मानों को प्रारूपित करने के लिए किया जाता है, इस फ़ंक्शन में मूल रूप से दो अनिवार्य तर्क होते हैं, एक इनपुट है जिसे एक स्ट्रिंग के रूप में लिया जाता है और दूसरा तर्क उस प्रारूप का प्रकार है जिसका हम उपयोग करना चाहते हैं उदाहरण के लिए यदि हम प्रारूप (.99, "प्रतिशत") का उपयोग करते हैं तो यह हमें 99% परिणाम देगा।
VBA एक्सेल में प्रारूप संख्या
VBA नियमित एक्सेल कार्यों से आगे की ओर है। VBA के कई अंतर्निहित कार्य हैं, ठीक उसी तरह जैसे कि हमारे पास वर्कशीट में 500 से अधिक ऑपरेशन हैं। VBA में ऐसा ही एक सूत्र "प्रारूप संख्या" है।
हां, आपने इसे सही सुना। हमारे पास VBA में "FormatNumber" नामक एक फ़ंक्शन है । इस लेख में, हम इस समारोह का पूरा दौरा करेंगे।
VBA NumberFormat के साथ संख्याओं को प्रारूपित कैसे करें?
जैसा कि फ़ंक्शन नाम स्वयं कहता है, यह उपयोगकर्ता द्वारा दिए गए स्वरूपण निर्देशों के अनुसार दिए गए नंबर को प्रारूपित करेगा।
संख्या स्वरूपण कुछ भी नहीं है, लेकिन दशमलव बिंदुओं को जोड़ना, कोष्ठक में नकारात्मक संख्याओं को जोड़ना, दशमलव मानों के लिए अग्रणी शून्य दिखाना आदि। VBA FormatNumber फ़ंक्शन का उपयोग करके , हम उन संख्याओं के लिए स्वरूपण शैली लागू कर सकते हैं, जिनके साथ हम काम करते हैं। नीचे फ़ंक्शन का सिंटैक्स है
- अभिव्यक्ति: यह और कुछ नहीं बल्कि उस संख्या है जिसे हमें प्रारूपित करने की आवश्यकता है।
- दशमलव के बाद के अंक: आप संख्या के दाईं ओर दशमलव स्थिति के लिए कितने अंक चाहते हैं।
- लीडिंग डिजिट को शामिल करें: लीडिंग डिजिट और कुछ नहीं बल्कि नंबर शुरू होने से पहले के अंक होते हैं। यह 1 से कम लेकिन -1 से अधिक के मूल्यों के लिए लागू है।
- यदि आप दशमलव मान से पहले शून्य दिखाना चाहते हैं, तो आप तर्क को TRUE या -1 के रूप में पास कर सकते हैं, और परिणाम होगा। "0.55"
- यदि आप दशमलव मान से पहले शून्य नहीं दिखाना चाहते हैं, तो आप तर्क को FALSE या 0 के रूप में पारित कर सकते हैं, और परिणाम ".55" होगा ।
- डिफ़ॉल्ट रूप से, मान -2 होगा, क्षेत्रीय कंप्यूटर सेटिंग्स।
- नकारात्मक संख्या के लिए माता-पिता का उपयोग करें: यदि आप कोष्ठक में नकारात्मक संख्या दिखाना चाहते हैं, तो आप तर्क को TRUE या -1 के रूप में पास कर सकते हैं, और परिणाम होगा। "(255)"
- यदि आप कोष्ठक के बिना ऋणात्मक संख्याओं को दिखाना चाहते हैं, तो आप तर्क को FALSE या 0 के रूप में पारित कर सकते हैं, और परिणाम होगा। "-255"
- समूह अंक: आप एक हजार विभाजक जोड़ना चाहते हैं या नहीं। यदि हाँ, TRUE या -1 तर्क है। यदि नहीं, तो FALSE या 0 तर्क है। डिफ़ॉल्ट रूप से, मान -2 है यानी, क्षेत्रीय कंप्यूटर सेटिंग्स के बराबर।
एक्सेल VBA FormatNumber फ़ंक्शन के उदाहरण
हम एक्सेल VBA प्रारूप संख्या फ़ंक्शन के व्यावहारिक उदाहरण देखेंगे। हम हर तर्क का अलग-अलग प्रदर्शन करेंगे।
इस उद्देश्य के लिए, मैक्रो नाम बनाएं और चर में से एक स्ट्रिंग के रूप में घोषित करें। हमें चर को स्ट्रिंग के रूप में रिपोर्ट करने की आवश्यकता है क्योंकि VBA फ़ंक्शन FormatNumber द्वारा दिया गया परिणाम केवल स्ट्रिंग के रूप में है।
कोड:
उप Format_Number_Example1 () मंद MyNum स्ट्रिंग अंत उप के रूप में
उदाहरण # 1 - संख्या के सामने दशमलव दशमलव जोड़ें
चरण # 1 - मान लें कि हम 25000 की संख्या के साथ काम कर रहे हैं, और हमें इसे प्रारूपित करने और संख्या के दाईं ओर दशमलव अंक जोड़ने की आवश्यकता है। हमारे वैरिएबल के लिए एक मान निर्दिष्ट करें।
कोड:
उप Format_Number_Example1 () स्ट्रिंग MyNum = FormatNumber के रूप में मंद MyNum (उप उप
चरण # 2 - सबसे पहले एक अभिव्यक्ति है, अर्थात, जिस संख्या को हमें प्रारूपित करने की आवश्यकता है, इसलिए हमारी संख्या 25000 है।
कोड:
उप प्रारूप_Number_Example1 () स्ट्रिंग MyNum के रूप में मंद MyNum = FormatNumber (25000, समाप्ति उप
चरण # 3 - अगला है कि हमें कितने अंकों को जोड़ने की आवश्यकता है, अर्थात, 2 नंबर।
कोड:
उप Format_Number_Example1 () स्ट्रिंग MyNum के रूप में मंद MyNum = FormatNumber (25000, 2) प्रति सेकंड
चरण # 4 - VBA संदेश बॉक्स में चर का मान दिखाएं।
कोड:
उप Format_Number_Example1 () MyNum स्ट्रिंग के रूप में मंद MyNum = FormatNumber (25000, 2) MsgBox MyNum अंत उप
चरण # 5 - इस मैक्रो का परिणाम इस तरह है।
हम संख्या के दाईं ओर दो दशमलव देख सकते हैं।
उदाहरण # 2 - समूह संख्या अर्थात, हजार विभाजक
एक ही नंबर के लिए, हम एक हजार विभाजकों को जोड़ या हटा सकते हैं। यदि हम एक हजार विभाजक दिखाना चाहते हैं, तो हमें अंतिम तर्क के लिए vbTrue का चयन करना होगा ।
कोड:
उप Format_Number_Example1 () MyNum स्ट्रिंग के रूप में मंद MyNum = FormatNumber (25000, 2,, vbTrue) MsgBox MyNum समाप्ति उप
यह इस तरह से परिणाम फेंक देगा।
अब, यदि vbFalse का चयन करें , तो हमें एक हजार विभाजक नहीं मिलेंगे।
कोड:
उप Format_Number_Example1 () MyNum स्ट्रिंग के रूप में मंद MyNum = FormatNumber (25000, 2,, vbFalse) MsgBox MyNum समाप्ति उप
इस कोड का परिणाम इस प्रकार है।
यदि मैं vbUseDefault का चयन करता हूं, तो हमें सिस्टम सेटिंग के अनुसार परिणाम मिलता है। नीचे इसी का परिणाम है।
इसलिए मेरी सिस्टम सेटिंग में डिफ़ॉल्ट रूप से एक हजार विभाजक हैं।
उदाहरण # 3 - नकारात्मक संख्याओं के लिए लघुकोष्ठक संलग्न करें
यदि हमारे पास एक हानिकारक संख्या है, तो हम कोष्ठक में ऋणात्मक संख्या दिखा सकते हैं। हमें "नकारात्मक संख्या के लिए माता-पिता का उपयोग करें" के तहत vbTrue का चयन करने की आवश्यकता है ।
कोड:
उप Format_Number_Example1 () MyNum स्ट्रिंग के रूप में मंद MyNum = FormatNumber (-25000, 2, vbTrue) MsgBox MyNum समाप्ति उप
अब परिणाम इस प्रकार है।
यदि हम vbFalse का चयन करते हैं, तो हमें ऋण चिह्न के साथ एक ऋणात्मक संख्या मिलेगी।
कोड:
उप Format_Number_Example1 () MyNum स्ट्रिंग के रूप में मंद MyNum = FormatNumber (-25000, 2, vbFalse) MsgBox MyNum समाप्ति उप
अब परिणाम इस प्रकार है।
