वीबीए में फ़्लोर फ़ंक्शन का उपयोग कैसे करें (उदाहरण के साथ)
आप किसी सेल में संख्या को निकटतम महत्वपूर्ण गुणक में पूर्णांकित करने के लिए VBA में फ़्लोर विधि का उपयोग कर सकते हैं।
इस फ़ंक्शन को व्यवहार में उपयोग करने का एक सामान्य तरीका यहां दिया गया है:
SubToFloor ()
Dim i As Integer
For i = 2 To 10
Range("C" & i) = WorksheetFunction.Floor(Range("A" & i), Range("B" & i))
Next i
End Sub
यह विशेष मैक्रो श्रेणी A2:A10 के प्रत्येक मान को श्रेणी B2:B10 में निर्दिष्ट निकटतम महत्वपूर्ण गुणक में पूर्णांकित करेगा और परिणाम को श्रेणी C2:C10 में प्रदर्शित करेगा।
निम्नलिखित उदाहरण दिखाता है कि व्यवहार में इस वाक्यविन्यास का उपयोग कैसे करें।
उदाहरण: वीबीए में फ़्लोर फ़ंक्शन का उपयोग कैसे करें
मान लीजिए कि हमारे पास कॉलम ए में मानों की एक सूची है और कॉलम बी में महत्वपूर्ण गुणकों की एक और सूची है, जिसमें हम प्रत्येक मान को गोल करना चाहते हैं:
हम कॉलम ए में प्रत्येक मान को कॉलम बी में महत्वपूर्ण गुणक में गोल करने के लिए वीबीए में फ़्लोर विधि के साथ निम्नलिखित मैक्रो बना सकते हैं:
SubToFloor ()
Dim i As Integer
For i = 2 To 10
Range("C" & i) = WorksheetFunction.Floor(Range("A" & i), Range("B" & i))
Next i
End Sub
जब हम इस मैक्रो को चलाते हैं, तो हमें निम्नलिखित आउटपुट प्राप्त होता है:
कॉलम सी, कॉलम ए में प्रत्येक मान पर फ़्लोर विधि का उपयोग करने का परिणाम दिखाता है।
उदाहरण के लिए, हम देख सकते हैं:
- 12.2452 को 0.001 के निकटतम गुणज तक पूर्णांकित करने पर 12.245 प्राप्त होता है।
- 14.927 को 0.01 के निकटतम गुणज तक पूर्णांकित करने पर 14.92 प्राप्त होता है।
- -5.23 को 0.1 के निकटतम गुणज तक पूर्णांकित करने पर -5.3 होता है।
और इसी तरह।
नोट : आप वीबीए फ़्लोर विधि के लिए संपूर्ण दस्तावेज़ यहां पा सकते हैं।
अतिरिक्त संसाधन
निम्नलिखित ट्यूटोरियल बताते हैं कि वीबीए में अन्य सामान्य कार्य कैसे करें:
VBA में मानों को कैसे पूर्णांकित करें
VBA में मानों को कैसे पूर्णांकित करें
VBA में मानों को 2 दशमलव स्थानों तक कैसे पूर्णांकित करें