सभी एक्सेल मानों को एक स्थिरांक से गुणा करें

किसी श्रेणी में सभी कक्षों को स्थिरांक से गुणा कैसे करें

क्या आप यह सुनिश्चित करना चाहेंगे कि किसी श्रेणी के सभी स्थिरांकों को एक गुणनखंड से गुणा किया जाए? आप इसे संपादित करें - सामग्री सम्मिलित करें फ़ंक्शन का चतुराई से उपयोग करके प्राप्त कर सकते हैं।

यदि आप निम्न मैक्रो का उपयोग करते हैं तो यह आसान है:

उप कारक का प्रयोग करें ()
रेंज के रूप में मंद सेल
मंद इनपुट मान जितना लंबा हो
इनपुट मान = इनपुटबॉक्स ("कृपया कारक दर्ज करें (जैसे 100)")
चयन में प्रत्येक सेल के लिए
यदि नहीं (Cell.HasFormula) तो
सेल। फॉर्मूला = "=" और सेल। वैल्यू और "*" और वैल (इनपुट वैल्यू)
अगर अंत
अगली सेल
अंत उप

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

फिर मैक्रो को कॉल करें। एक्सेल अब एक विंडो में उस कारक के लिए पूछता है जिसका आप उपयोग करना चाहते हैं। निम्न चित्र इस विंडो को दिखाता है:

ठीक बटन के साथ कारक की परिभाषा की पुष्टि करें।

एक्सेल अब चयन में सभी कोशिकाओं के माध्यम से चक्र करता है। केवल वे कक्ष जिनमें कोई सूत्र नहीं है, परिवर्तित होते हैं। उन्हें दर्ज किए गए कारक से गुणा किया जाता है। एक्सेल सेल में सूत्र के रूप में नया मान दर्ज करता है। निम्नलिखित आंकड़ा दिखाता है कि परिणाम कैसा दिख सकता है:

यदि आप संख्याओं को स्थिरांक के रूप में दर्ज करना चाहते हैं, तो "Cell.Formula" पंक्ति को निम्न व्यंजक से बदलें:

सेल। वैल्यू = सेल। वैल्यू * वैल (इनपुट वैल्यू)

एक से कम कारक दर्ज करके, आप कोशिकाओं को एक स्थिरांक से विभाजित भी कर सकते हैं।

मैक्रो का उपयोग करके सूत्र को स्थिरांक में बदलना: VBA का उपयोग करके गणना को निरपेक्ष मान में कैसे परिवर्तित करें

आप किसी श्रेणी के कक्षों को निरपेक्ष मानों में बदलना चाहते हैं। आप इसे क्षेत्र की प्रतिलिपि बनाकर और फिर इसे मूल्यों के रूप में चिपकाकर अंतःक्रियात्मक रूप से कर सकते हैं। 2003 के संस्करण तक एक्सेल में उपयुक्त कमांड को "एडिट - पेस्ट स्पेशल" और 2007 के संस्करण से एक्सेल में "स्टार्ट - पेस्ट - पेस्ट स्पेशल" कहा जाता है।

यदि आप अलग-अलग सेल को मैक्रो में बदलना चाहते हैं, तो निम्न प्रोग्राम कोड आपकी मदद करेगा:

सबवैल्यू कन्वर्ट ()
ActiveSheet.Range ("a1") के साथ
.फॉर्मूला = .Value
के साथ समाप्त करना
अंत उप

मैक्रो सक्रिय तालिका में सेल A1 की वर्तमान सामग्री को निरपेक्ष मान में परिवर्तित करता है।