वीबीए में कॉलम कैसे हटाएं (उदाहरण के साथ)


आप VBA का उपयोग करके Excel में कॉलम हटाने के लिए निम्नलिखित विधियों का उपयोग कर सकते हैं:

विधि 1: एक कॉलम हटाएँ

 SubDeleteColumns ()
Columns(" C ").Delete
End Sub

यह विशेष उदाहरण वर्तमान कार्यपुस्तिका से कॉलम C को हटा देगा।

विधि 2: श्रेणी से सभी कॉलम हटा दें

 SubDeleteColumns ()
Columns(" B:D ").Delete
End Sub

यह विशेष उदाहरण वर्तमान कार्यपुस्तिका में बी से डी श्रेणी के सभी कॉलम हटा देगा।

विधि 3: एकाधिक विशिष्ट कॉलम हटाएँ

 SubDeleteColumns ()
Range(" B:B,D:D ").Delete
End Sub

यह विशेष उदाहरण वर्तमान कार्यपुस्तिका से कॉलम बी और डी को हटा देगा।

निम्नलिखित उदाहरण दिखाते हैं कि एक्सेल में निम्नलिखित डेटा सेट के साथ अभ्यास में इनमें से प्रत्येक विधि का उपयोग कैसे करें:

उदाहरण 1: वीबीए में एक कॉलम हटाएं

हम अपने डेटासेट से केवल कॉलम C को हटाने के लिए निम्नलिखित मैक्रो बना सकते हैं:

 SubDeleteColumns ()
Columns(" C ").Delete
End Sub

जब हम इस मैक्रो को चलाते हैं, तो हमें निम्नलिखित आउटपुट प्राप्त होता है:

ध्यान दें कि डेटासेट से केवल कॉलम सी (“सहायता” कॉलम) हटा दिया गया था।

उदाहरण 2: श्रेणी से सभी कॉलम हटा दें

हम श्रेणी B से D तक के सभी स्तंभों को हटाने के लिए निम्नलिखित मैक्रो बना सकते हैं:

 SubDeleteColumns ()
Columns(" B:D ").Delete
End Sub

जब हम इस मैक्रो को चलाते हैं, तो हमें निम्नलिखित आउटपुट प्राप्त होता है:

ध्यान दें कि बी और डी (“पॉइंट्स,” “असिस्ट्स,” और “रिबाउंड्स” कॉलम) के बीच प्रत्येक कॉलम को डेटासेट से हटा दिया गया है।

उदाहरण 3: अनेक विशिष्ट कॉलम हटाएँ

हम डेटासेट से कॉलम बी और डी को हटाने के लिए निम्नलिखित मैक्रो बना सकते हैं:

 SubDeleteColumns ()
Range(" B:B,D:D ").Delete
End Sub

जब हम इस मैक्रो को चलाते हैं, तो हमें निम्नलिखित आउटपुट प्राप्त होता है:

ध्यान दें कि कॉलम बी और डी (“पॉइंट्स” और “रिबाउंड्स” कॉलम) को डेटासेट से हटा दिया गया है।

अतिरिक्त संसाधन

निम्नलिखित ट्यूटोरियल बताते हैं कि वीबीए में अन्य सामान्य कार्य कैसे करें:

वीबीए: श्रेणी में पंक्तियों की संख्या कैसे गिनें
वीबीए: उपयोग किए गए कॉलमों की संख्या कैसे गिनें
वीबीए: अंतिम प्रयुक्त कॉलम कैसे खोजें

एक टिप्पणी जोड़ने

आपका ईमेल पता प्रकाशित नहीं किया जाएगा. आवश्यक फ़ील्ड चिह्नित हैं *