इस लेख में, आप सीखेंगे कि VBA के साथ Excel में कॉलम नंबर के आधार पर विभिन्न कार्य करने के लिए रेंज का उपयोग कैसे करें।
वर्कबुक डाउनलोड करें
आप यहां से मुफ्त प्रैक्टिस Excel वर्कबुक डाउनलोड कर सकते हैं।
VBA रेंज ऑब्जेक्ट
VBA में रेंज ऑब्जेक्ट Excel वर्कशीट के भीतर एकल सेल, एकाधिक सेल, पंक्तियां, कॉलम समाहित कर सकता है।
रेंज ऑब्जेक्ट का पदानुक्रम नीचे दिया गया है।
एप्लिकेशन > वर्कबुक > वर्कशीट > रेंज
यह है कि आपको VBA में रेंज ऑब्जेक्ट कैसे घोषित करना चाहिए।
Excel में कॉलम नंबर के आधार पर रेंज का उपयोग करने के लिए VBA एम्बेड करने के 4 तरीके
यह सेक्शन चर्चा करेगा कि Excel में VBA मैक्रो का उपयोग करके कॉलम नंबर के आधार पर रेंज कैसे चुनें, कॉलम नंबर के आधार पर रेंज में मान कैसे सेट करें और रेंज का अंतिम कॉलम नंबर कैसे लौटाएं।
1. Excel में कॉलम नंबर के आधार पर रेंज चुनने के लिए VBA
यदि आप नीचे दिखाए गए अस्पष्ट डेटासेट की तरह Excel में कॉलम नंबर के आधार पर रेंज चुनना चाहते हैं, तो आपको समाधान पाने के लिए इस लेख को पढ़ना जारी रखना चाहिए।
ऊपर दिखाए गए डेटासेट से कॉलम नंबर का उपयोग करके रेंज चुनने के चरण नीचे वर्णित हैं।
चरण:
- अपने कीबोर्ड पर Alt + F11 दबाएं या डेवलपर -> विजुअल बेसिक टैब पर जाकर विजुअल बेसिक एडिटर खोलें।
- पॉप-अप कोड विंडो में, मेनू बार से, इन्सर्ट -> मॉड्यूल पर क्लिक करें।
- निम्न कोड कॉपी करें और इसे कोड विंडो में पेस्ट करें।
Sub SetRange() Range(Cells(2, 3), Cells(10, 5)).Select End Subयहां,
- Cells(2,3) = दूसरी पंक्ति, तीसरा कॉलम (सेल C2)
- Cells(10,5) = दसवीं पंक्ति, पांचवां कॉलम (सेल E10)
आपका कोड अब चलाने के लिए तैयार है।
- अपने कीबोर्ड पर F5 दबाएं या मेनू बार से रन -> रन सब/यूजरफॉर्म चुनें। आप सब-मेनू बार में छोटे प्ले आइकन पर क्लिक करके मैक्रो भी चला सकते हैं।
सेल रेंज C2 से E10 तक चुना जाएगा (नीचे दी गई तस्वीर देखें) हमारे द्वारा प्रदान किए गए कॉलम नंबर के आधार पर।
और पढ़ें: Excel में वेरिएबल रो नंबर के साथ VBA रेंज (4 उदाहरण)
2. Excel में कॉलम नंबर के आधार पर रेंज में मान सेट करने के लिए VBA
आपने पिछले सेक्शन में कॉलम नंबर के आधार पर रेंज चुनना सीखा। इस सेक्शन में, आप जानेंगे कि कॉलम नंबर के आधार पर रेंज में मान कैसे सेट करें।
चरण:
- पहले की तरह ही, डेवलपर टैब से विजुअल बेसिक एडिटर खोलें और कोड विंडो में मॉड्यूल इन्सर्ट करें।
- कोड विंडो में, निम्न कोड कॉपी करें और पेस्ट करें।
Sub SetValue() Range(Cells(2, 2), Cells(8, 4)).Value2 = "Hello!" End Subयहां,
- Cells(2,2) = दूसरी पंक्ति, दूसरा कॉलम (सेल B2)
- Cells(8,4) = आठवीं पंक्ति, चौथा कॉलम (सेल D8)
आपका कोड अब चलाने के लिए तैयार है।
- चलाएं मैक्रो और B2 से D8 तक के सभी सेल अब मान "Hello!" रखते हैं
और पढ़ें: Excel VBA: पंक्ति और कॉलम नंबर द्वारा रेंज सेट करें (3 उदाहरण)
समान पठन
- Excel VBA: सेल पते से पंक्ति और कॉलम नंबर प्राप्त करें (4 तरीके)
- Excel में पंक्ति और कॉलम नंबर द्वारा सेल संदर्भ कैसे करें (4 तरीके)
- Excel में रेंज में प्रत्येक सेल के लिए VBA (3 तरीके)
- Excel में कॉलम नंबर को अक्षर में कैसे बदलें (3 तरीके)
- Excel में रेंज सेट करने के लिए VBA (7 उदाहरण)
3. Excel में कॉलम नंबर के आधार पर अलग वर्कशीट से रेंज चुनने के लिए VBA
यहां आप सीखेंगे कि Excel में कॉलम नंबर के आधार पर अलग वर्कशीट से रेंज कैसे चुनें।
ऐसा करने के चरण नीचे दिखाए गए हैं।
चरण:
- पहले की तरह ही, डेवलपर टैब से विजुअल बेसिक एडिटर खोलें और कोड विंडो में मॉड्यूल इन्सर्ट करें।
- कोड विंडो में, निम्न कोड कॉपी करें और पेस्ट करें।
Sub FixedRange() Dim iRng As Range Dim iSheet As Worksheet Set iSheet = Worksheets("Range") 'वर्कशीट नाम चुनें" With iSheet .Cells(1, 7).Select 'वर्कशीट पर सेल G7 चुनें Set iRng = .Range(.Cells(3, 3), .Cells(7, 6)) End With iRng.Select 'वर्कशीट पर सेल C3:F7 की रेंज चुनें End Subयहां,
- Cells(3,3) = तीसरी पंक्ति, तीसरा कॉलम (सेल C3)
- Cells(7,6) = सातवीं पंक्ति, छठा कॉलम (सेल F7)
आपका कोड अब चलाने के लिए तैयार है।
- चलाएं कोड और C3 से F7 तक के सभी सेल "Range" नाम की वर्कशीट से चुने जाएंगे (नीचे दी गई तस्वीर देखें) हमारे द्वारा प्रदान किए गए कॉलम नंबर के आधार पर।
और पढ़ें: Excel में कॉलम नंबर को अक्षर में बदलने के लिए VBA (3 तरीके)
4. Excel में रेंज में अंतिम कॉलम नंबर लौटाने के लिए VBA
इस सेक्शन में, हम VBA कोड के बारे में जानेंगे कि Excel में सक्रिय रेंज में अंतिम कॉलम नंबर कैसे प्राप्त करें।
निम्न डेटासेट पर विचार करें जिसमें सेल A1 से D10 तक डेटा है। हम रिटर्न बॉक्स, सेल F5 में रेंज से अंतिम कॉलम नंबर निकालेंगे।
ऐसा करने के चरण नीचे दिए गए हैं।
चरण:
- पहले की तरह ही, डेवलपर टैब से विजुअल बेसिक एडिटर खोलें और कोड विंडो में मॉड्यूल इन्सर्ट करें।
- कोड विंडो में, निम्न कोड कॉपी करें और पेस्ट करें।
Sub ReturnLastColumnInRange() 'वेरिएबल घोषित करें Dim iSheet As Worksheet Dim iRng As Range Set iWS = Worksheets("Return") 'वर्कशीट चुनें Set iRng = iWS.Range("A1:D10") 'रेंज सेट करें 'एक सेल में अंतिम कॉलम नंबर लौटाएं iWS.Range("F5") = iRng.Column + iRng.Columns.Count - 1 End Subआपका कोड अब चलाने के लिए तैयार है।
- चलाएं मैक्रो और आपको सेल F5 में अंतिम कॉलम नंबर, 4, मिलेगा।
और पढ़ें: Excel में मिलान के कॉलम नंबर कैसे लौटाएं (5 उपयोगी तरीके)
VBA सेट रेंज के लाभ
- इसे लागू करना बहुत आसान है।
- रेंज ऑब्जेक्ट के अंदर के तर्क निश्चित नहीं हैं। इसलिए हम अपनी आवश्यकताओं के अनुसार तर्क के मान संशोधित कर सकते हैं।
- तर्क के रूप में 1 से अधिक मान पास किए जा सकते हैं।
याद रखने योग्य बातें
- CELLS गुण VBA में रेंज को VBA में सेट करने के लिए भी उपयोग किया जा सकता है।
- ऑब्जेक्ट वेरिएबल को SET कीवर्ड द्वारा ऑब्जेक्ट के संदर्भ के रूप में सेट किया जाना चाहिए।
निष्कर्ष
इस लेख ने आपको दिखाया कि VBA के साथ Excel में कॉलम नंबर के आधार पर विभिन्न कार्य करने के लिए रेंज का उपयोग कैसे करें। मुझे आशा है कि यह लेख आपके लिए बहुत फायदेमंद रहा है। विषय के संबंध में कोई भी प्रश्न पूछने के लिए स्वतंत्र महसूस करें।
संबंधित लेख
- सेल मान के आधार पर रेंज कैसे चुनें VBA (7 तरीके)
- Excel VBA रेंज को दूसरी शीट पर कॉपी करें (8 सबसे आसान तरीके)
- VBA में Excel सबस्क्रिप्ट आउट ऑफ रेंज त्रुटि (5 समाधानों के साथ)
- [फिक्स्ड!] Excel कॉलम नंबर के साथ लेबल किए गए हैं अक्षर नहीं
- Excel में कॉलम अक्षर को नंबर चार्ट में कैसे बदलें (4 तरीके)
