ठूलो डाटाबेसहरूमा, तपाईंले दायरा र कक्षहरूसँग व्यवहार गर्न आफ्नो धेरैजसो समय बिताउनुभयो। कहिलेकाहीँ तपाईंले ठूला दायराहरू वा सेलहरूको ठूलो संख्यामा उही कार्य दोहोर्याउनु पर्छ। यसले एकै समयमा तपाईंको समय नष्ट गर्दछ र तपाईंको दक्षता घटाउँछ। यस समस्याको स्मार्ट समाधान भनेको VBA प्रोग्रामिङ कोड निर्माण गर्नु हो जुन दायराको प्रत्येक कक्ष मार्फत चल्नेछ र तपाईंद्वारा निर्देशित समान कार्यहरू प्रदर्शन गर्नेछ। आज यस लेखमा, हामी एक्सेलमा दायराको प्रत्येक कक्षको लागि VBA कसरी गर्ने भनेर छलफल गर्नेछौं।

अभ्यास कार्यपुस्तिका डाउनलोड गर्नुहोस्

तपाईंले यो लेख पढ्दै गर्दा कार्य अभ्यास गर्न यो अभ्यास पुस्तक डाउनलोड गर्नुहोस्।

एक्सेल मा दायरा मा प्रत्येक सेल को लागी VBA लागू गर्ने 3 उपयुक्त तरिकाहरु

VBA कोड प्रयोग गरेर तपाइँ दायरा वा स्तम्भ वा पङ्क्तिमा प्रत्येक कक्षमा समान सूत्र प्रदर्शन गर्न सक्नुहुन्छ। यस खण्डमा, हामी सबै खण्डहरूमा जानेछौं।

१. दायराको प्रत्येक कक्षको लागि VBA लागू गर्नुहोस्

तपाईले प्रत्येक कक्षको लागि समान VBA कोड लागू गर्नुपर्ने अवस्थालाई विचार गर्नुहोस्। दिइएको दायरा ( B3:F12 )। यो गर्नको लागि हामी VBA कोड निर्माण गर्नेछौं। निर्देशनहरू तल दिइएका छन्

चरण 1:

• पहिले, हामी हाम्रो कामलाई सरल बनाउन आदेश बटन घुसाउनेछौं। । आफ्नो विकासकर्ता ट्याब मा जानुहोस्, घुसाउनुहोस् चयन गर्नुहोस्, र एउटा प्राप्त गर्न आदेश बटनमा क्लिक गर्नुहोस्।

<12 हामीले हाम्रो आदेश पाएका छौंबटन।

• विकल्पहरू खोल्न आदेश बटनमा दायाँ क्लिक गर्नुहोस्। चयन गर्नुहोस् र केही विकल्पहरू परिमार्जन गर्न गुणहरू मा क्लिक गर्नुहोस्। यहाँ हामीले नाम परिवर्तन गरेर, “ यहाँ क्लिक गर्नुहोस् ”।

चरण २:

• पहिले, हामी दुई चर घोषणा गर्नेछौं। हामी दायरा वस्तुहरूलाई कल गर्छौं CL र Rng । तपाईंले तिनीहरूलाई मनपर्ने नाम दिन सक्नुहुन्छ।

8899

• यो आदेशद्वारा निर्दिष्ट दायरा तोक्नुहोस्,

सेट गर्नुहोस् Rng = Worksheets("VBA1"). दायरा("B3:F12")

• यहाँ VBA1 हाम्रो कार्यपत्रको नाम हो र B3:F12 हाम्रो परिभाषित दायरा हो।

• अब हामी दायराको प्रत्येक सेल मार्फत प्रदर्शन गर्न कोड प्रयोग गर्नेछौं। कोड हो,

2990

• Value = 100 यसले 100 दिएको दायरामा प्रत्येक सेलको लागि फर्काउनेछ भनेर बुझाउँछ।

• त्यसोभए हाम्रो अन्तिम कोड बन्छ,

4787

• आफ्नो मुख्य कार्यपत्रमा जानुहोस् र VBA चलाउन आदेश बटनमा क्लिक गर्नुहोस्। दायराको प्रत्येक कक्षको लागि।

चरण 3:

• संख्यात्मक मानहरू जस्तै, हामी पनि दायरामा प्रत्येक कक्षको लागि पाठ मानहरू राख्नुहोस्। त्यस अवस्थामा, VBA सञ्झ्यालमा जानुहोस्, र 100 को सट्टा, तपाईले चलाउन चाहनु भएको पाठ मान घुसाउनुहोस्। परिवर्तन भयोरेखा हो

7042

• कमाण्ड बटनमा क्लिक गर्नुहोस् र VBA कोडले दायराको प्रत्येक कक्षको लागि यो पाठ मान फिर्ता गर्नेछ।

चरण 4:

• यस चरणमा, हामी अलि गहिरो खन्नेछौं। मानौं हामी हाम्रो दायरामा प्रत्येक खाली कक्ष हाइलाइट गर्न चाहन्छौं।

• यसको लागि, तपाइँको अवस्थित कोडमा नयाँ सर्त थप्नुहोस्। नयाँ सूत्र हो,

8551

• यो नयाँ कोडले रातो रङको साथ खाली कक्षलाई हाइलाइट गर्नेछ। त्यसैले पूरा कोड हो,

6286

• कमाण्ड बटनमा क्लिक गरेर परिणाम प्राप्त गर्नुहोस्।

समान पढाइहरू:

• एक्सेलमा VBA को दायरा वस्तु कसरी प्रयोग गर्ने (5 गुणहरू)
• VBA दायरा अफसेट प्रयोग गर्नुहोस् (11 तरिकाहरू)
• एक्सेलमा पाठ कसरी गणना गर्ने (७ सजिलो ट्रिक्स)

2. VBA घुसाउनुहोस् दायराको स्तम्भमा प्रत्येक कक्षको लागि कोड

हामी स्तम्भमा पनि प्रत्येक कक्षको लागि VBA कोड चलाउन सक्छौं। मानौं हामीसँग संख्याहरू भएको स्तम्भ छ र हामीले 10 भन्दा कम मानहरू रङ गर्नुपर्छ। हामी स्तम्भमा प्रत्येक सेल चलाउनको लागि VBA कोड निर्माण गर्नेछौं।

चरण 1:

• हामीले छलफल गरेका निर्देशनहरू पछ्याएर आदेश बटन सिर्जना गर्नुहोस्।

चरण 2:

• VBA सञ्झ्याल खोल्न आदेश बटनमा डबल क्लिक गर्नुहोस्।
• हामी " c " प्रकारको भेरिएबल घोषणा गर्नेछौं। लामो। हामीले यहाँ Long चर प्रयोग गरिरहेका छौं किनभने Longचरहरूको क्षमता पूर्णांक चरहरू भन्दा ठूलो हुन्छ।

6952

• अर्को, हाम्रो स्तम्भमा सबै कक्षहरूको फन्ट रङ परिवर्तन गर्ने कोड लाइन थप्नुहोस्। कालो।

7488

• यो कोडको लागि लूप घुसाउनुहोस्।

9524

• यस चरणमा, हामी सेल C4 (10) को मान भन्दा कम मानहरूलाई रंग दिनको लागि एक अवस्था प्रविष्ट गर्नेछौं। त्यसो गर्न यो कोड प्रविष्ट गर्नुहोस्।

7654

• त्यसैले अन्तिम कोड हो,

1578

• VBA कमाण्ड बटनमा क्लिक गर्दा परिणामहरू चल्नेछ र देखाउनेछ।

3. दायराको पङ्क्तिमा प्रत्येक कक्षको लागि VBA कोड लेख्नुहोस्

हामी पङ्क्तिमा पनि प्रत्येक सेलको लागि VBA कोड चलाउन सक्छौं। दिइएको पङ्क्तिमा, हामीले पङ्क्तिको प्रत्येक कक्षमा समान कार्य गर्न आवश्यक छ।

चरण 1:

• कमाण्ड बटन थप्नुहोस् र यसको नाम परिवर्तन गर्नुहोस् “ यहाँ क्लिक गर्नुहोस्! ”

• बटनमा डबल-क्लिक गर्नुहोस् VBA सञ्झ्याल खोल्नुहोस्। तल प्रदान गरिएको VBA कोड लेख्नुहोस्।

4076

• कोड पङ्क्तिको प्रत्येक कक्षमा चल्नेछ र प्रत्येक कक्षमा पहेंलो रङ भरिनेछ।

• बटनमा क्लिक गर्नुहोस् र हाम्रो नतिजा यहाँ छ।

Quick Notes

👉 यदि तपाइँसँग तपाइँको विकासकर्ता ट्याब देखिने छैन, तपाइँ यसलाई यो निर्देशन प्रयोग गरेर सक्रिय गर्न सक्नुहुन्छ।

अनुकूलित द्रुत पहुँच उपकरणपट्टी → थप आदेशहरू → अनुकूलन रिबन → विकासकर्ता  → ठीक छ

निष्कर्ष

हामीले दायरामा प्रत्येक कक्षको लागि VBA चलाउनको लागि तीन फरक दृष्टिकोणहरू पार गर्यौं। यदि तपाइँसँग कुनै प्रश्न वा प्रश्नहरू छन् भने तपाइँलाई टिप्पणी गर्न स्वागत छ। तपाईले हाम्रो एक्सेल कार्यहरूसँग सम्बन्धित अन्य लेखहरू पनि जाँच गर्न सक्नुहुन्छ!