अपनी एक्सेल सूचियों को एक मैक्रो के साथ इस तरह से फ़िल्टर करें कि एक से अधिक प्रविष्टियाँ केवल एक बार नई लक्ष्य सूची में दिखाई दें और इस प्रकार आपके डेटा को साफ़ करें।
कई सूचियों में डुप्लिकेट प्रविष्टियाँ होती हैं। कभी-कभी इन प्रविष्टियों को सूची से बाहर फ़िल्टर करना महत्वपूर्ण होता है। उदाहरण के लिए, आप एक बिक्री सूची का उपयोग एक सूची बनाने के लिए कर सकते हैं जिसमें प्रत्येक ग्राहक केवल एक बार दिखाई देता है - उदाहरण के लिए, यह बाजार विश्लेषण के लिए महत्वपूर्ण हो सकता है।
निम्न आकृति की तालिका कॉलम बी में संख्याओं के साथ एक छोटी एक्सेल सूची दिखाती है।
आप इस सूची से एक नई सूची बनाना चाहते हैं, जिसमें संख्याएं अब दो बार दिखाई न दें। 21 नंबर, जो मूल सूची में सेल B3, B5 और B14 में पाया जा सकता है, नई सूची में केवल एक बार दिखाई देगा।
ऐसे कई तरीके हैं जिनसे आप एक्सेल के साथ ऐसा कर सकते हैं। यदि आप मैक्रो का उपयोग करना चाहते हैं, तो आप निम्न VBA कमांड का उपयोग कर सकते हैं:
डुप्लिकेट के बिना उप सूची ()
रेंज के रूप में मंद स्रोत
सीमा के रूप में मंद लक्ष्य
स्रोत सेट करें = रेंज ("बी 1")
लक्ष्य निर्धारित करें = श्रेणी ("d1")
Source.EntireColumn.AdvancedFilter क्रिया: = xlFilterCopy, _
मानदंड: = स्रोत। संपूर्ण कॉलम, कॉपी टू रेंज: = लक्ष्य, अद्वितीय: = सत्य
अंत उप
मैक्रो शुरू करने के बाद, एक्सेल तालिका को फ़िल्टर करता है और सेल डी 1 से नई तालिका प्रदर्शित करता है। निम्नलिखित आंकड़ा परिणाम दिखाता है:
आप देख सकते हैं कि प्रत्येक मान परिणाम सूची में केवल एक बार दिखाई देता है।
अपनी तालिका के कॉलम को निर्दिष्ट करने के लिए SOURCE चर का उपयोग करें जिसमें डेटा स्थित है जिससे आप डुप्लिकेट प्रविष्टियों के बिना एक नई सूची बनाना चाहते हैं। मैक्रो हमेशा उस संदर्भ से संबंधित संपूर्ण कॉलम का उपयोग करता है जिसे आप SOURCE से परिभाषित करते हैं। संबंधित कॉलम में किसी भी सेल पते को परिभाषित करने के लिए चर का प्रयोग करें।
चर TARGET के साथ आप यह निर्धारित करते हैं कि Excel आपके परिणामों की सूची कहाँ लिखता है। नई सूची उस स्थिति से शुरू होती है जिसे आप इस चर के साथ निर्दिष्ट करते हैं।
मैक्रो सोर्स एरिया और टारगेट एरिया दोनों के लिए एक्टिव वर्कशीट के साथ काम करता है।
किसी तालिका में मैक्रो सम्मिलित करने के लिए, संबंधित कार्यपुस्तिका खोलें और VBA संपादक को प्रारंभ करने के लिए Excel के सभी संस्करणों में कुंजी संयोजन ALT F11 दबाएं। INSERT - MODULE कमांड को कॉल करें और VBA कमांड डालें। एक्सेल से मैक्रो शुरू करने के लिए, कुंजी संयोजन ALT F8 का उपयोग करें।