विषयसूची
बड़े डेटाबेस में, आपने अपना अधिकांश समय रेंज और सेल के साथ काम करने में बिताया। कभी-कभी आपको एक ही क्रिया को बड़ी रेंज या बड़ी संख्या में सेल में दोहराना पड़ता है। यह एक ही समय में आपके समय को मारता है और आपकी दक्षता को कम करता है। इस समस्या का स्मार्ट समाधान एक VBA प्रोग्रामिंग कोड बनाना है जो रेंज में प्रत्येक सेल के माध्यम से चलेगा और आपके द्वारा निर्देशित समान क्रिया करेगा। आज इस लेख में, हम चर्चा करेंगे कि एक्सेल में रेंज में प्रत्येक सेल के लिए VBA कैसे करें।
अभ्यास कार्यपुस्तिका डाउनलोड करें
जब आप इस लेख को पढ़ रहे हों तो कार्य का अभ्यास करने के लिए इस अभ्यास पुस्तक को डाउनलोड करें।
Excel.xlsx में रेंज में प्रत्येक सेल के लिए VBA कोड
एक्सेल में रेंज में प्रत्येक सेल के लिए VBA लागू करने के 3 उपयुक्त तरीके
VBA कोड का उपयोग करके आप किसी श्रेणी या स्तंभ या पंक्ति में प्रत्येक कक्ष के लिए समान सूत्र निष्पादित कर सकते हैं। इस अनुभाग में, हम सभी अनुभागों से गुजरेंगे।
1. रेंज में प्रत्येक सेल के लिए VBA लागू करें
ऐसी स्थिति पर विचार करें जहां आपको प्रत्येक सेल के लिए समान VBA कोड लागू करना है। दी गई सीमा ( B3:F12 ). ऐसा करने के लिए हम एक VBA कोड बनाएंगे। निर्देश नीचे दिए गए हैं
चरण 1:
- सबसे पहले, हम अपने काम को आसान बनाने के लिए एक कमांड बटन डालेंगे . अपने डेवलपर टैब पर जाएं, इन्सर्ट चुनें, और एक प्राप्त करने के लिए कमांड बटन पर क्लिक करें।
- हमें अपनी आज्ञा मिल गई हैबटन।
- विकल्प खोलने के लिए कमांड बटन पर राइट-क्लिक करें। कुछ विकल्पों को संशोधित करने के लिए गुण का चयन करें और क्लिक करें।
- कमांड बटन का कैप्शन बदलें। यहां हम नाम बदलकर " यहां क्लिक करें " कर देते हैं।
चरण 2:
- पहले, हम दो चर घोषित करेंगे। हम रेंज ऑब्जेक्ट्स सीएल और आरएनजी कहते हैं। आप उन्हें अपनी पसंद के अनुसार नाम दे सकते हैं।
1522
- इस आदेश द्वारा विशिष्ट श्रेणी निर्दिष्ट करें,
सेट करें Rng = वर्कशीट ("VBA1")। रेंज ("B3:F12")
- यहां VBA1 हमारी वर्कशीट का नाम है और B3:F12 हमारी परिभाषित सीमा है।
- अब हम रेंज में प्रत्येक सेल के माध्यम से प्रदर्शन करने के लिए कोड का उपयोग करेंगे। कोड है,
9564
- Value = 100 दर्शता है कि दी गई रेंज में प्रत्येक सेल के लिए यह 100 वापस आ जाएगा।
- तो हमारा अंतिम कोड बन जाता है,
5098
- अपने मुख्य कार्यपत्रक पर जाएं और VBA चलाने के लिए कमांड बटन पर क्लिक करें श्रेणी में प्रत्येक सेल के लिए।
चरण 3:
- संख्यात्मक मानों की तरह, हम रेंज में प्रत्येक सेल के लिए टेक्स्ट वैल्यू रखें। उस स्थिति में, VBA विंडो पर जाएं, और 100 के बजाय, वह टेक्स्ट वैल्यू डालें, जिससे आप रन करना चाहते हैं। बदल गयालाइन है
5045
- कमांड बटन पर क्लिक करें और VBA कोड रेंज में प्रत्येक सेल के लिए यह टेक्स्ट मान लौटाएगा। <14
- इस चरण में, हम थोड़ी गहराई तक जाएंगे। मान लें कि हम अपनी सीमा में प्रत्येक रिक्त सेल को हाइलाइट करना चाहते हैं।
- उसके लिए, अपने मौजूदा कोड में एक नई शर्त जोड़ें। नया सूत्र है,
चरण 4:
8314
- यह नया कोड रिक्त सेल को लाल रंग से हाईलाइट करेगा। तो पूरा कोड है,
3487
- कमांड बटन पर क्लिक करके रिजल्ट प्राप्त करें।
समान रीडिंग:
- एक्सेल में VBA के रेंज ऑब्जेक्ट का उपयोग कैसे करें (5 गुण)
- VBA रेंज ऑफ़सेट का उपयोग करें (11 तरीके)
- Excel में टेक्स्ट की गणना कैसे करें (7 आसान ट्रिक्स)
2. VBA डालें
श्रेणी के कॉलम में प्रत्येक सेल के लिए कोड हम कॉलम में भी प्रत्येक सेल के लिए VBA कोड चला सकते हैं। मान लीजिए कि हमारे पास संख्याओं वाला एक कॉलम है और हमें 10 से कम मानों को रंगना है। हम कॉलम में प्रत्येक सेल को चलाने के लिए एक VBA कोड बनाएंगे।
चरण 1:
- हमारे द्वारा चर्चा किए गए निर्देशों का पालन करते हुए एक कमांड बटन बनाएं।
चरण 2:
- VBA विंडो खोलने के लिए कमांड बटन पर डबल-क्लिक करें।
- हम " c " प्रकार का वेरिएबल घोषित करेंगे लंबा। हम यहां लॉन्ग वेरिएबल टाइप का इस्तेमाल कर रहे हैं क्योंकि लॉन्गपूर्णांक चरों की तुलना में चरों की क्षमता अधिक होती है।
9221
- इसके बाद, उस कोड पंक्ति को जोड़ें जो हमारे स्तंभ में सभी कक्षों के फ़ॉन्ट रंग को बदल देती है काला।
8260
- इस कोड के लिए लूप डालें।
7394
- इस चरण में, हम उन मानों को रंगने के लिए एक शर्त दर्ज करेंगे जो सेल C4 (10) के मान से कम हैं। ऐसा करने के लिए यह कोड दर्ज करें।
6871
- तो अंतिम कोड है,
1835
- VBA कमांड बटन पर क्लिक करने पर चलेगा और परिणाम दिखाएगा।
0> हम प्रत्येक सेल के लिए एक पंक्ति में भी VBA कोड चला सकते हैं। दी गई पंक्ति में, हमें पंक्ति के प्रत्येक सेल पर समान क्रिया करने की आवश्यकता है।
चरण 1:
- कमांड बटन जोड़ें और उसका नाम बदलकर “ यहां क्लिक करें! ”
- करने के लिए बटन पर डबल-क्लिक करें वीबीए विंडो खोलें। नीचे दिए गए VBA कोड को लिख लें।
9861
- कोड पंक्ति के प्रत्येक सेल के माध्यम से चलेगा और प्रत्येक सेल में एक पीला रंग भरेगा।
- बटन पर क्लिक करें और हमारा परिणाम यहां है।
क्विक नोट्स
👉 अगर आपके पास आपका डेवलपर टैब दृश्यमान नहीं है, आप इस निर्देश का उपयोग करके इसे सक्रिय कर सकते हैं।
कस्टमाइज़्ड क्विक एक्सेस टूलबार → अधिक कमांड्स → कस्टमाइज़ रिबन → डेवलपर → ओके
निष्कर्ष
हम एक श्रेणी में प्रत्येक सेल के लिए VBA चलाने के लिए तीन अलग-अलग तरीकों से गुजरे हैं। यदि आपके कोई प्रश्न या प्रश्न हैं तो टिप्पणी करने के लिए आपका स्वागत है। आप एक्सेल कार्यों से संबंधित हमारे अन्य लेख भी देख सकते हैं!
