Vba में निरपेक्ष मानों की गणना कैसे करें (उदाहरण के साथ)

किसी संख्या का निरपेक्ष मान संख्या और शून्य के बीच की दूरी को दर्शाता है।

VBA में निरपेक्ष मानों की गणना करने के लिए, आप Abs फ़ंक्शन का उपयोग कर सकते हैं।

इस फ़ंक्शन को व्यवहार में उपयोग करने का एक सामान्य तरीका यहां दिया गया है:

 Sub FindAbsoluteValue()

    Dim i As Integer
    
    For i = 2 To 10
        Range(" B " & i) = Abs(Range(" A " & i))
    Next i
      
End Sub

यह विशेष उदाहरण A2:A10 श्रेणी में प्रत्येक सेल के निरपेक्ष मान की गणना करता है और उन्हें B2:B10 श्रेणी में प्रदर्शित करता है।

निम्नलिखित उदाहरण दिखाता है कि व्यवहार में VBA में निरपेक्ष मानों की गणना कैसे करें।

उदाहरण: वीबीए में निरपेक्ष मानों की गणना कैसे करें

मान लीजिए हमारे पास Excel में मानों की निम्नलिखित सूची है:

मान लीजिए कि हम कॉलम ए में प्रत्येक सेल के पूर्ण मूल्य की गणना करना चाहते हैं और उन्हें कॉलम बी में प्रदर्शित करना चाहते हैं।

ऐसा करने के लिए हम निम्नलिखित मैक्रो बना सकते हैं:

 Sub FindAbsoluteValue()

    Dim i As Integer
    
    For i = 2 To 10
        Range(" B " & i) = Abs(Range(" A " & i))
    Next i
      
End Sub

जब हम इस मैक्रो को चलाते हैं, तो हमें निम्नलिखित आउटपुट प्राप्त होता है:

कॉलम बी अब कॉलम ए में प्रत्येक मान का पूर्ण मान प्रदर्शित करता है।

ध्यान दें कि कॉलम ए में प्रत्येक सकारात्मक मान कॉलम बी में सकारात्मक रहा।

यह भी ध्यान दें कि कॉलम A में प्रत्येक नकारात्मक मान को कॉलम B में सकारात्मक मान में बदल दिया गया है।

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

अतिरिक्त संसाधन

निम्नलिखित ट्यूटोरियल बताते हैं कि वीबीए में अन्य सामान्य कार्य कैसे करें:

वीबीए: रेंज के औसत मूल्य की गणना कैसे करें
वीबीए: किसी श्रेणी में मान कैसे जोड़ें
वीबीए: श्रेणी में पंक्तियों की संख्या कैसे गिनें