VBA मैक्रो का उपयोग करके मौजूदा सेल सामग्री में नंबर जोड़ें

Anonim

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

किसी सूची में कक्षों में चिह्न जोड़ना अक्सर आवश्यक होता है। ऐसा करने के लिए, सेल श्रेणी में सभी स्थिरांक के लिए एक निश्चित मान जोड़ना आवश्यक है।

सूत्र नहीं बदलने चाहिए। एक मैक्रो इस कार्य को हल करता है और एक चिह्नित डेटा क्षेत्र में सभी स्थिरांक के लिए आपकी पसंद की संख्या जोड़ता है।

इस तरह, उदाहरण के लिए, आप कीमतों और इसी तरह की चीजों को नई परिस्थितियों में जल्दी और प्रभावी ढंग से समायोजित कर सकते हैं।

निम्नलिखित आंकड़ा एक तालिका दिखाता है जिसे बदला जाना है। कक्ष B1 और B2 में स्थिरांक होते हैं, और कक्ष B3 और B4 में सूत्र होते हैं। दो सूत्र कक्ष स्थिर मान वाले कक्षों को संदर्भित करते हैं।

इस सूची के सभी स्थिरांकों में संख्या 10 जोड़ने के लिए, पहले डेटा क्षेत्र B1: B4 चिह्नित करें और फिर निम्न मैक्रो को कॉल करें:

उप स्थिरांक जोड़ें ()
रेंज के रूप में मंद सेल
लंबे समय तक मंद कारक
अतिरिक्त राशि = 10
चयन में प्रत्येक सेल के लिए
सेल के साथ
यदि नहीं (.HasFormula) तो .Value = .Value + अतिरिक्त राशि
के साथ समाप्त करना
अगली सेल
अंत उप

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

मैक्रो उस कारक का उपयोग करता है जिसे आपने "अतिरिक्त राशि" चर के लिए मान असाइनमेंट में परिभाषित किया था।

मैक्रो में प्रवेश करने के लिए, VBA संपादक लाने के लिए एक्सेल में ALT F11 दबाएं। एक खाली मॉड्यूल शीट डालने के लिए INSERT - MODULE कमांड का उपयोग करें। मैक्रो को सीधे एक्सेल से शुरू करने के लिए, कुंजी संयोजन ALT F8 का उपयोग करें।