वीबीए: गणना में पाई का उपयोग कैसे करें
गणित में, पाई एक अपरिमेय संख्या (एक अंतहीन दशमलव संख्या) है जो लगभग 3.14 के बराबर है।
VBA में गणनाओं में Pi का उपयोग करने के लिए, आप निम्नलिखित सिंटैक्स का उपयोग कर सकते हैं:
Function MultiplyByPi(inputVal)
Dim Pi As Double
MultiplyByPi = inputVal * Application.WorksheetFunction.Pi()
End Function
यह विशेष फ़ंक्शन आपको Excel में किसी भी मान को Pi से गुणा करने की अनुमति देता है।
ध्यान दें कि एप्लिकेशन.वर्कशीटफंक्शन.पीआई मान 3.14159265358979 लौटाता है, जो सटीक 15-अंकीय पीआई स्थिरांक है।
यदि आपको 15 अंकों से अधिक सटीक गणना की आवश्यकता है, तो आप पाई को जितने चाहें उतने अंकों के साथ हार्डकोड कर सकते हैं।
निम्नलिखित उदाहरण दिखाता है कि व्यवहार में इस वाक्यविन्यास का उपयोग कैसे करें।
उदाहरण: वीबीए में पाई का उपयोग कैसे करें
मान लीजिए कि हमारे पास एक्सेल में मानों की निम्नलिखित सूची है जिसे हम पाई से गुणा करना चाहते हैं:
ऐसा करने के लिए, हम VBA में निम्नलिखित फ़ंक्शन बना सकते हैं:
Function MultiplyByPi(inputVal)
Dim Pi As Double
MultiplyByPi = inputVal * Application.WorksheetFunction.Pi()
End Function
एक बार जब हम यह फ़ंक्शन बना लेते हैं, तो हम सेल A2 में मान को Pi से गुणा करने के लिए सेल B2 में निम्नलिखित सूत्र टाइप कर सकते हैं:
=MultiplyByPi( A2 )
फिर हम इस सूत्र को क्लिक करके कॉलम बी में प्रत्येक शेष सेल पर खींच सकते हैं:
कॉलम बी अब कॉलम ए में प्रत्येक मान को पाई से गुणा करके प्रदर्शित करता है।
अतिरिक्त संसाधन
निम्नलिखित ट्यूटोरियल बताते हैं कि वीबीए में अन्य सामान्य कार्य कैसे करें:
वीबीए: किसी श्रेणी में मान कैसे जोड़ें
वीबीए: रेंज के औसत मूल्य की गणना कैसे करें
वीबीए: श्रेणी में पंक्तियों की संख्या कैसे गिनें