Excel VBA में फ़िल्टर कैसे निकालें (5 सरल तरीके)

  • इसे साझा करें
Hugh West

Microsoft Excel के साथ काम करते समय, डेटा फ़िल्टर करने से हम केवल वही जानकारी देख पाते हैं जो हम चाहते हैं। जब भी हम किसी बड़े डेटासेट या टेबल में कुछ तत्वों पर ध्यान केंद्रित करना चाहते हैं, तो यह तकनीक काम आती है। जब काम पूरा हो जाता है, तो हमें उस डेटा को अपनी स्प्रैडशीट में वापस लाने की आवश्यकता होती है। हालांकि इसके लिए Excel में पहले से ही एक बिल्ट-इन टूल मौजूद है। लेकिन VBA एक्सेल में किसी भी कार्य को संचालित करने का सबसे कुशल, समय बचाने वाला और सुरक्षित तरीका है। इस लेख में, हम एक्सेल VBA में फ़िल्टर को हटाने के लिए कुछ उदाहरण देंगे।

अभ्यास कार्यपुस्तिका डाउनलोड करें

आप कार्यपुस्तिका डाउनलोड कर सकते हैं और उनके साथ अभ्यास कर सकते हैं।

Filter.xlsm को हटाने के लिए VBA

Excel में फ़िल्टर हटाने के 5 आसान तरीके VBA

Excel में बिल्ट-इन है डेटा से फ़िल्टर हटाने के लिए उपकरण और कार्य। लेकिन Excel VBA के साथ हम केवल VBA कोड चलाकर उन फ़िल्टर को जल्दी से हटा सकते हैं। डेटा से फ़िल्टर हटाने के लिए हम निम्नलिखित डेटासेट का उपयोग करने जा रहे हैं। डेटासेट में कॉलम बी में कुछ उत्पाद आईडी, कॉलम सी में उत्पाद के नाम और कॉलम डी में डिलीवरी देश शामिल हैं। जैसा कि हम केवल उत्पाद शैंपू और कंडीशनर का विवरण देखना चाहते हैं, इसलिए हमने उन्हें फ़िल्टर किया। अब, मान लीजिए कि हमें उन फ़िल्टर किए गए डेटा को साफ़ करने की आवश्यकता है। इसके लिए हम कुछ Excel VBA Macros का इस्तेमाल करेंगे। आइए Excel का उपयोग करके डेटा से उन फ़िल्टर को साफ़ करने के उदाहरण प्रदर्शित करेंVBA .

1. एक्सेल टेबल से सभी फिल्टर हटाने के लिए वीबीए लागू करें

एक्सेल वीबीए के साथ, उपयोगकर्ता आसानी से उस कोड का उपयोग कर सकते हैं जो रिबन से एक्सेल मेनू के रूप में कार्य करता है। Excel तालिका से सभी फ़िल्टर हटाने के लिए VBA कोड का उपयोग करने के लिए, नीचे दिए गए चरणों का पालन करें।

STEPS:

  • सबसे पहले , रिबन से डेवलपर टैब पर जाएं।
  • दूसरा, कोड श्रेणी से, विज़ुअल बेसिक पर क्लिक करके <1 खोलें>विजुअल बेसिक एडिटर । या Visual Basic Editor खोलने के लिए Alt + F11 दबाएं।

  • ऐसा करने के बजाय, आप बस अपनी वर्कशीट पर राइट-क्लिक कर सकते हैं और कोड देखें पर जा सकते हैं। यह आपको Visual Basic Editor पर भी ले जाएगा।

  • यह Visual Basic Editor <2 में दिखाई देगा>जहां रेंज से तालिका बनाने के लिए हम अपने कोड लिखते हैं।
  • तीसरा, मॉड्यूल पर सम्मिलित करें ड्रॉप-डाउन मेनू बार पर क्लिक करें।
  • <14

    • यह आपकी कार्यपुस्तिका में मॉड्यूल बनाएगा।
    • और, VBA को कॉपी और पेस्ट करें कोड नीचे दिखाया गया है।

    VBA कोड:

    7182
    • उसके बाद, RubSub बटन पर क्लिक करके कोड चलाएँ या कीबोर्ड शॉर्टकट F5 दबाकर। आपकी वर्कशीट पर।

    VBA कोडस्पष्टीकरण

    4760

    उप कोड का एक हिस्सा है जिसका उपयोग कोड में काम को संभालने के लिए किया जाता है लेकिन कोई मूल्य नहीं लौटाएगा। इसे उपप्रक्रिया के रूप में भी जाना जाता है। इसलिए हम अपनी प्रक्रिया को नाम देते हैं Remove_Filters1() .

    2330

    वैरिएबल डिक्लेरेशन।

    3635

    VBA सेट बस हमें उस रेंज में टाइप करने से बचने की अनुमति देता है जिसे हमें चुनना है और फिर से कोड चलाते समय। इसलिए, हम शीट पर पहली तालिका का संदर्भ सेट करते हैं।

    4145

    कोड की यह पंक्ति संपूर्ण डेटा के लिए सभी फ़िल्टर हटा देगी।

    7561

    इससे प्रक्रिया समाप्त हो जाएगी।

    और पढ़ें: एक्सेल में फ़िल्टर कैसे निकालें (5 आसान और त्वरित तरीके)

    2। VBA का उपयोग करके शीट पर सभी एक्सेल तालिका फ़िल्टर साफ़ करें

    आइए एक शीट पर सभी एक्सेल तालिका फ़िल्टर को निकालने के लिए Excel VBA का उपयोग करने का एक और उदाहरण देखें। इसके लिए नीचे दिए गए चरणों का पालन करें।

    STEPS:

    • सबसे पहले, रिबन से Develope r टैब पर जाएं।
    • दूसरा, विज़ुअल बेसिक एडिटर खोलने के लिए विज़ुअल बेसिक पर क्लिक करें।
    • विज़ुअल बेसिक एडिटर खोलने का दूसरा तरीका बस Alt + F11 दबाना है।
    • या, शीट पर राइट-क्लिक करें, फिर कोड देखें चुनें।
    • अगला, पर जाएं डालें और ड्रॉप-डाउन मेनू से मॉड्यूल चुनें।
    • और, यह विज़ुअल बेसिक विंडो खोल देगा।
    • उसके बाद, कॉपी करें और नीचे VBA कोड पेस्ट करें।

    VBA कोड:

    6106
    • आगे, दबाएंकोड को रन करने के लिए F5 कुंजी या रन सब बटन पर क्लिक करें।

    • और, यह कोड आपकी शीट से सभी एक्सेल टेबल फिल्टर को साफ कर देगा और विधि 1 जैसा आउटपुट देगा।

    VBA कोड स्पष्टीकरण

    7979

    शीट पर सभी तालिकाओं के माध्यम से कोड लूप की वे पंक्तियाँ और संपूर्ण वर्कशीट के लिए सभी फ़िल्टर हटा दें।

    और पढ़ें: एक्सेल पिवट टेबल को कैसे फ़िल्टर करें (8 असरदार तरीके)

    3. Excel में VBA वाले कॉलम से फ़िल्टर निकालें

    चलिए Excel VBA वाले कॉलम से फ़िल्टर साफ़ करने के दूसरे तरीके पर एक नज़र डालते हैं। इसके लिए प्रक्रिया देखते हैं।

    कदम:

    • शुरू करने के लिए, रिबन पर डेवलपर टैब पर क्लिक करें।
    • दूसरा, विजुअल बेसिक पर क्लिक करके विजुअल बेसिक एडिटर लॉन्च करें।
    • वैकल्पिक रूप से, आप विजुअल बेसिक एडिटर तक पहुंच सकते हैं Alt + F11 दबाना।
    • या, शीट पर राइट-क्लिक करें और मेनू से कोड देखें चुनें।
    • इसके बाद, इन्सर्ट के नीचे ड्रॉप-डाउन बॉक्स से मॉड्यूल चुनें।
    • और विजुअल बेसिक विंडो दिखाई देगी।
    • कोड लिखें वहाँ।

    VBA कोड:

    9452
    • अंत में, कोड चलाने के लिए F5 कुंजी दबाएँ।

    • इस कोड का उपयोग करने से आपकी एक्सेल तालिका के एक कॉलम से फ़िल्टर हट जाएगा।

    VBA कोड स्पष्टीकरण

    6055

    यह कोड पंक्ति फ़ील्ड निर्दिष्ट करती हैसिर्फ संख्या और कोई अन्य पैरामीटर नहीं।>समान रीडिंग

    • Excel VBA: ऐरे में मल्टीपल क्राइटेरिया के साथ कैसे फ़िल्टर करें (7 तरीके)
    • डेटा फ़िल्टर करने के लिए VBA कोड Excel में दिनांक के अनुसार (4 उदाहरण)
    • संरक्षित एक्सेल शीट में फ़िल्टर का उपयोग कैसे करें (आसान चरणों के साथ)
    • विभिन्न कॉलम को एकाधिक द्वारा फ़िल्टर करें एक्सेल वीबीए में मानदंड
    • एक्सेल में डाटा फिल्टर करने के लिए वीबीए कोड (8 उदाहरण)

    4। किसी सक्रिय वर्कशीट में सभी फ़िल्टर साफ़ करें

    अब, किसी अन्य Excel VBA विधि पर एक सक्रिय वर्कशीट से सभी फ़िल्टर साफ़ करने के लिए एक नज़र डालें। आइए नीचे दिए गए चरणों का अनुसरण करें।

    STEPS:

    • शुरू करने के लिए, रिबन खोलें और डेवलपर विकल्प चुनें।
    • फिर, विजुअल बेसिक एडिटर तक पहुंचने के लिए, विजुअल बेसिक पर क्लिक करें।
    • Alt + F11 दबाने से भी ऊपर आ जाएगा विज़ुअल बेसिक संपादक
    • वैकल्पिक रूप से, राइट-क्लिक करें शीट और दिखाई देने वाले मेनू से कोड देखें चुनें।
    • अब, सम्मिलित करें ड्रॉप-डाउन विकल्प से, मॉड्यूल चुनें।
    • फिर VBA कोड को कॉपी और पेस्ट करें।<13

    VBA कोड:

    7841
    • F5 कुंजी दबाकर कोड रन करें।

    • और, अंत में, आप इस VBA कोड का उपयोग करके अपने डेटा से फ़िल्टर हटाने में सक्षम होंगेजैसे विधि-1

    और पढ़ें: एक्सेल में दूसरी शीट में सूची द्वारा फ़िल्टर कैसे करें (2 विधियाँ)

    5. कार्यपुस्तिका से सभी फ़िल्टर निकालने के लिए Excel VBA

    आइए कार्यपुस्तिका से सभी फ़िल्टर निकालने का एक और r Excel VBA तरीका एक्सप्लोर करें। तो, आइए चरणों को नीचे देखें।

    कदम:

    • शुरू करने के लिए, रिबन खोलें और ड्रॉप से ​​ डेवलपर चुनें -डाउन मेनू।
    • फिर विज़ुअल बेसिक संपादक खोलने के लिए विज़ुअल बेसिक चुनें।
    • विज़ुअल बेसिक संपादक हो सकता है Alt + F11 दबाकर भी एक्सेस किया जा सकता है।
    • वैकल्पिक रूप से, आप राइट-क्लिक शीट पर क्लिक कर सकते हैं और कोड देखें पॉप- up menu.
    • उसके बाद, Insert drop-down menu से Module चुनें।
    • फिर निम्न VBA code को कॉपी और पेस्ट करें।

    VBA कोड:

    9857
    • अंत में, अपने कीबोर्ड पर F5 दबाकर कोड रन करें और आप परिणाम को इसमें देख सकते हैं आपकी वर्कशीट। विधि ।

    VBA कोड स्पष्टीकरण

    1489

    पहला लूप कार्यपुस्तिका में सभी तालिकाओं के माध्यम से लूपिंग के लिए है। दूसरा पाश कार्यपत्रक पर सभी तालिकाओं के माध्यम से पाशन के लिए है। फिर, लूप के अंदर की रेखा तालिका से फ़िल्टर को साफ़ करती है। उसके बाद, अंतिम दो पंक्तियों के साथ लूप को बंद करें।

    पढ़ेंअधिक: एक्सेल फ़िल्टर के लिए शॉर्टकट (उदाहरणों के साथ 3 त्वरित उपयोग)

    निष्कर्ष

    उपर्युक्त विधियाँ आपकी सहायता करेंगी एक्सेल VBA में फ़िल्टर निकालें। आशा है कि यह आपकी मदद करेगा! यदि आपके कोई प्रश्न, सुझाव या प्रतिक्रिया है तो कृपया हमें टिप्पणी अनुभाग में बताएं। या आप ExcelWIKI.com ब्लॉग!

में हमारे अन्य लेखों पर एक नज़र डाल सकते हैं।

ह्यूग वेस्ट उद्योग में 10 से अधिक वर्षों के अनुभव के साथ एक अत्यधिक अनुभवी एक्सेल ट्रेनर और विश्लेषक है। उनके पास लेखा और वित्त में स्नातक की डिग्री और व्यवसाय प्रशासन में मास्टर डिग्री है। ह्यूग को पढ़ाने का शौक है और उन्होंने एक अद्वितीय शिक्षण दृष्टिकोण विकसित किया है जिसका पालन करना और समझना आसान है। एक्सेल के उनके विशेषज्ञ ज्ञान ने दुनिया भर में हजारों छात्रों और पेशेवरों को अपने कौशल में सुधार करने और अपने करियर में उत्कृष्टता हासिल करने में मदद की है। अपने ब्लॉग के माध्यम से, ह्यूग दुनिया के साथ अपने ज्ञान को साझा करता है, व्यक्तियों और व्यवसायों को उनकी पूरी क्षमता तक पहुंचने में मदद करने के लिए मुफ्त एक्सेल ट्यूटोरियल और ऑनलाइन प्रशिक्षण प्रदान करता है।