यह ट्यूटोरियल प्रदर्शित करेगा कि एक्सेल में पंक्तियों और स्तंभों को सम्मिलित करने के लिए वीबीए का उपयोग कैसे करें।
पंक्तियों या स्तंभों को सम्मिलित करने के लिए हम का उपयोग करेंगे विधि सम्मिलित करें.
एकल पंक्ति या स्तंभ सम्मिलित करें
नई पंक्ति डालें
एकल पंक्ति सम्मिलित करने के लिए, आप Rows Object का उपयोग कर सकते हैं:
1 | पंक्तियाँ(4)। सम्मिलित करें |
या आप EntireRow के साथ रेंज ऑब्जेक्ट का उपयोग कर सकते हैं:
1 | रेंज ("बी 4")। EntireRow.Insert |
नया कॉलम डालें
पंक्तियों को सम्मिलित करने के समान, हम कॉलम डालने के लिए कॉलम ऑब्जेक्ट का उपयोग कर सकते हैं:
1 | कॉलम (4)। सम्मिलित करें |
या रेंज ऑब्जेक्ट, EntireColumn के साथ:
1 | रेंज ("बी 4")। संपूर्ण कॉलम। सम्मिलित करें: |
एकाधिक पंक्तियाँ या स्तंभ सम्मिलित करें
एकाधिक पंक्तियाँ सम्मिलित करें
पंक्तियाँ ऑब्जेक्ट के साथ कई पंक्तियाँ सम्मिलित करते समय, आपको पंक्तियों को उद्धरणों में दर्ज करना होगा:
1 | पंक्तियाँ("4:6")। सम्मिलित करें |
रेंज ऑब्जेक्ट के साथ कई पंक्तियों को सम्मिलित करना एक ही पंक्ति के समान कार्य करता है:
1 | रेंज ("बी 4: बी 6")। EntireRow.Insert |
एकाधिक कॉलम सम्मिलित करें
कॉलम ऑब्जेक्ट के साथ कई कॉलम डालने पर, कॉलम दर्ज करें पत्र उद्धरणों में:
1 | कॉलम ("बी: डी")। सम्मिलित करें: |
रेंज ऑब्जेक्ट के साथ कई कॉलम सम्मिलित करना एक ही कॉलम के समान काम करता है:
1 | रेंज ("बी 4: डी 4")। संपूर्ण कॉलम। सम्मिलित करें |
सम्मिलित करें - शिफ्ट और कॉपीओरिजिन
NS विधि सम्मिलित करें दो वैकल्पिक तर्क हैं:
- खिसक जाना - कोशिकाओं को किस दिशा में स्थानांतरित करना है
- प्रतिलिपि उत्पत्ति - कॉपी करने के लिए कौन सा सेल फ़ॉर्मेटिंग (ऊपर, नीचे, बाएँ या दाएँ)
संपूर्ण पंक्तियों या स्तंभों को सम्मिलित करते समय Shift तर्क अप्रासंगिक है. यह आपको केवल नीचे शिफ्ट करने या दाईं ओर शिफ्ट होने का संकेत देने की अनुमति देता है:
- xlशिफ्टडाउन - कोशिकाओं को नीचे खिसकाएं
- xlShiftToRight - सेल को दाईं ओर शिफ्ट करें
जैसा कि आप देख सकते हैं, आप ऊपर या दाईं ओर शिफ्ट नहीं हो सकते।
NS प्रतिलिपि उत्पत्ति तर्क में दो संभावित इनपुट हैं:
- xlFormatFromLeftorऊपर - (0) नव-सम्मिलित सेल ऊपर या बाईं ओर की कोशिकाओं से स्वरूपण लेते हैं
- xlFormatFromRightorनीचे (१) नव-सम्मिलित कोशिकाएँ नीचे या दाईं ओर की कोशिकाओं से स्वरूपण लेती हैं।
आइए के कुछ उदाहरण देखें प्रतिलिपि उत्पत्ति तर्क। यहां हमारा प्रारंभिक डेटा है:
यह उदाहरण उपरोक्त पंक्ति से स्वरूपण लेते हुए एक पंक्ति सम्मिलित करेगा।
1 | पंक्तियाँ(5)। सम्मिलित करें , xlFormatFromLeftOrAbove |
यह उदाहरण नीचे की पंक्ति से स्वरूपण लेते हुए एक पंक्ति सम्मिलित करेगा।
1 | पंक्तियाँ(5)। सम्मिलित करें , xlFormatFromRightOrBelow |
अन्य सम्मिलित उदाहरण
कॉपी की गई पंक्तियाँ या कॉलम सम्मिलित करें
यदि आप एक कॉपी की गई पंक्ति सम्मिलित करना चाहते हैं, तो आप इस तरह के कोड का उपयोग करेंगे:
12 | रेंज ("1: 1")। कॉपी करेंरेंज ("5: 5")। सम्मिलित करें: |
यहां हम रो 1 को कॉपी करते हैं और इसे रो 5 पर इंसर्ट करते हैं।
सेल वैल्यू के आधार पर पंक्तियाँ डालें
यह एक श्रेणी के माध्यम से लूप करेगा, सेल मानों के आधार पर पंक्तियों को सम्मिलित करेगा:
1234567891011 | उप InsertRowswithSpecificValue ()रेंज के रूप में मंद सेलरेंज में प्रत्येक सेल के लिए ("बी 2: बी 20")अगर सेल। वैल्यू = "इन्सर्ट" तोसेल। पूरी पंक्ति। सम्मिलित करेंअगर अंतअगली सेलअंत उप |
पंक्तियां या कॉलम हटाएं
पंक्तियों या स्तंभों को हटाने के लिए, बस का उपयोग करें हटाएं तरीका।
1234567 | पंक्तियाँ(1).हटाएँरेंज ("ए 1")। EntireRow.Deleteकॉलम (1)। हटाएंरेंज ("a1")। EntireColumn.Delete |