VBA स्पष्ट सामग्री - VBA कोड का उपयोग करके सामग्री को कैसे साफ़ या हटाएं?

एक्सेल VBA स्पष्ट सामग्री

स्पष्ट सामग्री VBA में एक विधि है जिसका उपयोग उन मूल्यों को हटाने या हटाने के लिए किया जाता है जो इसे प्रदान की गई कोशिकाओं में संग्रहीत हैं, यह विधि सेल श्रेणी को खाली कर देती है और इसका उपयोग निर्दिष्ट सेल रेंज तक पहुंचने के लिए रेंज प्रॉपर्टी के साथ किया जाता है, उदाहरण इस विधि का उपयोग करने के लिए सीमा ("A1: B2") निम्नानुसार है। इस विधि को साफ़ करें A1 से B2 तक कोशिकाओं की सामग्री को साफ़ कर देगा।

एक्सेल में, डेटा जोड़ना और डेटा हटाना एक सामान्य रूटीन कार्य है। कभी-कभी हम एक एकल कक्ष मान, कभी-कभी कई कक्ष मानों को हटा देते हैं, और कभी-कभी हमें संपूर्ण कार्यपत्रक सामग्री को भी हटाना पड़ सकता है। इस लेख में, हम आपको दिखाएंगे कि एक्सेल VBA में "स्पष्ट सामग्री" पद्धति का उपयोग कैसे करें। VBA में, हमारे पास ऐसा करने के लिए कई तरीके हैं जैसे "साफ़ करें," "हटाएं," और "स्पष्ट सामग्री।"

एक्सेल VBA में स्पष्ट सामग्री क्या हैं?

इससे पहले कि मैं आपको VBA में Clear Contents के बारे में बताऊं, मुझे यह दिखाने दें कि हम विशिष्ट रेंज में डेटा को कैसे हटा या साफ़ कर सकते हैं।

उदाहरण के लिए, नीचे दिए गए डेटा को देखें।

अब, यदि मुझे सेल A1 से C3 तक क्लियर करना है, तो हमें सबसे पहले VBA RANGE ऑब्जेक्ट का उपयोग करके सेल की रेंज का उल्लेख करना होगा।

कोड:

रेंज ("A1: C3")

RANGE ऑब्जेक्ट का उपयोग करके कोशिकाओं की श्रेणी का उल्लेख करने के बाद, हमें सेल मानों के उल्लेख को बंद करने के लिए "Clear" विधि का चयन करना होगा।

कोड:

रेंज ("A1: C3")। स्पष्ट

यह उल्लिखित सेल मानों को बंद कर देगा।

कोड:

उप Clear_Example () रेंज ("A1: C3")। Clear End Sub

स्पष्ट पद्धति के अलावा, हम "DELETE" विधि का भी उपयोग कर सकते हैं।

कोड:

रेंज ("A1: C3") हटाएं

यह उल्लिखित सेल वैल्यू को हटा देगा, ठीक उसी तरह जैसे कि हमारी स्पष्ट विधि ने किया है।

यदि आप सेल के सभी डेटा को हटाना चाहते हैं, तो आप एक वर्कशीट नाम के साथ VBA CELLS संपत्ति का उपयोग कर सकते हैं।

वर्कशीट ("शीट 1")

वर्कशीट ("शीट 1")

उपरोक्त दोनों कोड कार्यपत्रक “Sheet1” के संपूर्ण डेटा को हटा देंगे। यह पहली सेल से सही वर्कशीट के अंतिम सेल में सेल वैल्यू को हटा देगा।

यदि आप वर्तमान पत्रक कोशिकाओं को हटाना चाहते हैं, तो आप सक्रिय शीट ऑब्जेक्ट का उपयोग कर सकते हैं।

ActiveSheet.Cells.Delete या ActiveSheet.Cells.Clear

अंतर स्पष्ट और हटाएँ तरीकों के बीच

मुझे पता है कि यह सवाल आपके दिमाग में पहले ही आ चुका होगा।

हां, इन दोनों विधियों में अंतर है।

जब आप "डिलीट" विधि का उपयोग करते हैं, तो यह सेल को हटा देगा, और नीचे की सेल हटाई गई सेल की स्थिति को संभाल लेगी।

उदाहरण के लिए, नीचे दी गई छवि देखें।

अब मैं सेल A1 को हटाने के लिए डिलीट मेथड का उपयोग करूंगा।

कोड:

उप Clear_Example () रेंज ("A1")

मैं इस कोड को चलाऊंगा और देखूंगा कि क्या होता है।

देखो यहाँ क्या हुआ; जैसा कि मैंने बताया कि जब मैंने सेल A1 को डिलीट किया था तब इसे डिलीट कर दिया गया था, लेकिन सेल A2 एक सेल को ऊपर ले जाता है और डिलीट किए गए सेल पर कब्जा कर लेता है। इससे डेटा बेमेल हो जाएगा। इसलिए डिलीट विधि का उपयोग करते समय सावधान रहें।

अब उसी डेटा के लिए, मैं विधि को साफ कर दूंगा।

कोड:

उप Clear_Example () रेंज ("A1")। Clear End Sub

अब देखिए जब मैं यह कोड चलाता हूं तो क्या होता है।

इस कोड ने सेल A1 को अन्य कोशिकाओं को बदले बिना खाली कर दिया है। यह संपूर्ण डेटा श्रेणी के कक्षों के केवल भाग को हटाने के लिए उचित विधि है।

कोशिकाओं के स्वरूपण को फिर से बनाने के लिए VBA स्पष्ट सामग्री विधि का उपयोग करें

यदि आपने पिछले दो तरीकों का अवलोकन किया है, तो उन दो विधियों को न केवल नष्ट कर दिया गया है और प्रदान की गई कोशिकाओं को हटा दिया गया है। यह हमारे द्वारा प्रदान की गई कोशिकाओं के प्रारूपण को भी हटा देता है।

कोशिकाओं के प्रारूपण को बनाए रखने के लिए, हमें "हटाएं" या "साफ़ नहीं" का उपयोग करने की आवश्यकता नहीं है, लेकिन हमें VBA "साफ़ सामग्री" विधि का उपयोग करने की आवश्यकता है।

जिस समय आप एक RANGE ऑब्जेक्ट का उपयोग करके कोशिकाओं की सीमा में प्रवेश करते हैं, यह उससे जुड़े सभी गुणों और विधियों को दिखाएगा।

हम "डिलीट" एक्सेस कर सकते हैं, हम "क्लियर" एक्सेस कर सकते हैं और हम "क्लियरकंटेंट्स" तरीके भी कर सकते हैं।

इस विधि का चयन करें।

कोड:

उप Clear_Example () रेंज ("A1: C3")। ClearContents End Sub

अब, यह A1 से C3 सेल तक की सामग्री को साफ कर देगा, लेकिन हमारे पास सभी मौजूदा स्वरूपण होंगे जैसा कि यह है।

जैसा कि आप उपरोक्त चित्र में देख सकते हैं, हमारे पास VBA, सीमाओं और उन उल्लिखित कोशिकाओं से जुड़े प्रत्येक स्वरूपण में सेल रंग है।

इसी तरह, हम अन्य शीट्स की सामग्री को भी साफ कर सकते हैं।

वर्कशीट ("शीट 1")। रेंज ("A1: D10")

इससे शीट "शीट 1" में कोशिकाओं A1 से D10 तक की सामग्री साफ हो जाएगी।

इसी तरह, हम अन्य खुली कार्यपुस्तिका कोशिकाओं को भी हटा सकते हैं।

कार्यपुस्तिकाएं ("Book1.xlsx")। कार्यपत्रक ("शीट 1")। सीमा ("A1: 10")। ClearContents

विशिष्ट रेंज के सभी वर्कशीट और स्पष्ट सामग्री के माध्यम से लूप

मान लें कि आपकी कार्यपुस्तिका में कई पत्रक हैं, और आप ऐसा करने के लिए VBA में प्रत्येक लूप के लिए उपयोग की जाने वाली सभी शीटों में A1 से C15 तक कक्षों की श्रेणी को हटाना चाहते हैं।

नीचे दिया गया कोड काम करेगा।

कोड:

ActiveWorkbook.Worksheets Ws.Range ("A1: C15") में प्रत्येक Ws के लिए सब क्लीयरशीट के रूप में उप Clear_All () डिम Ws। क्लीयरकंट्स नेक्स्ट Ws एंड सब।

नोट: आप अपनी इच्छानुसार कक्षों की श्रेणी बदल सकते हैं।

बस अगर आप संपूर्ण कार्यपत्रक डेटा को बंद करना चाहते हैं, तो आपको नीचे दिए गए कोड का उपयोग करना होगा।

कोड:

उप Clear_All () डिमांड Ws के रूप में वर्कशीट के लिए प्रत्येक W के लिए ActiveWorkbook.Worksheets Ws.Cells.ClearContents अगला Ws अंत उप

आप यहाँ VBA Clear Contents Excel टेम्पलेट डाउनलोड कर सकते हैं - VBA Clear Contents टेम्पलेट।