आमतौर पर, एडवांस्ड फ़िल्टर विकल्प हमें एक डेटा रेंज से कई शर्तों के संबंध में डेटा निकालने की अनुमति देता है। हम Excel में एडवांस्ड फ़िल्टर का उपयोग करके डेटा को दूसरी शीट पर कॉपी कर सकते हैं। कॉपी और पेस्ट डेटा Excel में काम करते समय एक सामान्य और अक्सर उपयोग किया जाने वाला फ़ंक्शन है। डेटा को दूसरी शीट पर कॉपी करने के लिए एडवांस्ड फ़िल्टर का उपयोग प्रक्रिया को अधिक प्रभावी बनाता है। इस लेख के तरीकों को समझाने के लिए हम सभी उदाहरणों के लिए समान डेटासेट का उपयोग करेंगे।
आप यहां से अभ्यास कार्यपुस्तिका डाउनलोड कर सकते हैं।
Excel में एडवांस्ड फ़िल्टर का उपयोग करके डेटा को दूसरी शीट पर कॉपी करने के 2 उपयोग
हम Excel में एडवांस्ड फ़िल्टर का उपयोग करके डेटा को दूसरी शीट पर कॉपी करने के लिए दो विधियों को प्रदर्शित करेंगे। पहली विधि में, हम Data टैब से Advanced विकल्प का उपयोग करेंगे। दूसरी विधि में, हम VBA कोड लागू करके एडवांस्ड फ़िल्टर विकल्प को सक्रिय करेंगे। फिर हम VBA कोड का उपयोग करके डेटा को दूसरी शीट पर कॉपी करेंगे।
1. एडवांस्ड फ़िल्टर सुविधा के साथ डेटा को दूसरी वर्कशीट पर कॉपी करें
सबसे पहले और सबसे महत्वपूर्ण, हम Excel रिबन से Advanced विकल्प का उपयोग करके एडवांस्ड फ़िल्टर मानदंड के साथ डेटा को दूसरी शीट पर कॉपी करेंगे। Advanced विकल्प Excel में Data टैब के अंतर्गत “Sort & Filter” नामक अनुभाग में उपलब्ध है। निम्नलिखित डेटासेट में, हमारे पास विभिन्न विक्रेताओं के लिए “Last Name”, “Sales Amount”, और City हैं। हम डेटा को “Copy Sheet” नामक शीट पर केवल उन विक्रेताओं के लिए कॉपी करेंगे जिनका अंतिम नाम Smith और Jones है जो हमारा मानदंड है।

तो, आइए इस क्रिया को करने के चरण देखें।
चरण:
- सबसे पहले, “Copy Sheet” नामक शीट पर जाएं जहां हम डेटा कॉपी करना चाहते हैं।
- दूसरे, Data चुनें। “Sort & Filter” अनुभाग से Advanced विकल्प पर क्लिक करें।

- “Advanced Filter” नामक एक नया डायलॉग बॉक्स दिखाई देगा।

- तीसरे, “Copy to another location” विकल्प चेक करें।
- फिर “List range” इनपुट बॉक्स पर क्लिक करें और “Actual Sheet” नामक शीट पर जाएं।

- अब, रेंज (B4:D15) चुनें।
- हम देख सकते हैं कि रेंज (B4:D15) “List range” में चुनी गई है। इनपुट बॉक्स में, मान निम्न जैसा दिखेगा।
List range: ‘Actual Sheet’!$B$4:$D15

- उसके बाद, “Advanced Filter” डायलॉग बॉक्स में निम्न मान सेट करें-
Criteria range: ‘Actual Sheet’!$F$9:$F$11
Copy to: ‘Copy Sheet’!$B$4
- अगला, OK दबाएं।

- अंत में, हम देख सकते हैं कि उपरोक्त क्रियाएं “Actual Sheet” नामक शीट से हाइलाइट की गई सभी पंक्तियों को “Copy Sheet” नामक शीट पर कॉपी करती हैं।

और पढ़ें: Excel में एडवांस्ड फ़िल्टर के साथ VBA से डेटा दूसरी शीट पर कॉपी करें
समान पठन:
- Excel में कैसे उपयोग करें एडवांस्ड फ़िल्टर यदि मानदंड रेंज में टेक्स्ट है
- Excel एडवांस्ड फ़िल्टर: "Does Not Contain" लागू करें (2 तरीके)
- Excel में केवल अद्वितीय रिकॉर्ड के लिए एडवांस्ड फ़िल्टर का उपयोग कैसे करें
- Excel में खाली सेल्स को बाहर करने के लिए एडवांस्ड फ़िल्टर का उपयोग कैसे करें (3 आसान ट्रिक्स)
- मानदंड के साथ एडवांस्ड फ़िल्टर के Excel VBA उदाहरण (6 मानदंड)
2. VBA कोड के साथ एडवांस्ड फ़िल्टर लागू करके डेटा को दूसरी वर्कशीट पर कॉपी करें
हम VBA कोड के साथ एडवांस्ड फ़िल्टर लागू करके डेटा को दूसरी शीट पर कॉपी कर सकते हैं। मूल रूप से इस विधि में, हम पिछला कार्य फिर से करेंगे लेकिन इस बार हम Data टैब से Advanced विकल्प का उपयोग नहीं करेंगे। इसके बजाय, हम एडवांस्ड फ़िल्टर विकल्प की कार्यक्षमता को सक्रिय करने के लिए एक VBA कोड लागू करेंगे।

तो, आइए VBA कोड के साथ एडवांस्ड फ़िल्टर विकल्प लागू करके डेटा को दूसरी वर्कशीट पर कॉपी करने के चरणों पर एक नज़र डालें।
चरण:
- पहले, शीट “Copy Sheet-2” चुनें, जहां हम अपना डेटा कॉपी करेंगे।
- अगला, शीट पर राइट-क्लिक करें और “View Code” विकल्प चुनें।

- फिर, एक खाली VBA मॉड्यूल दिखाई देगा।
- खाली मॉड्यूल में निम्न कोड डालें:
Sub Advance_Filter_to_Copy_to_Another_Sheet() Dim Str As String Dim Address As String Dim Rg As Range Dim CRg As Range Dim SRg As Range On Error Resume Next xAddress = ActiveWindow.RangeSelection.Address Set Rg = Application.InputBox("Please select the filter range:", "Copy to Another Sheet", xAddress, , , , , 8) If Rg Is Nothing Then Exit Sub Set CRg = Application.InputBox("Please select the criteria range:", "Copy to Another Sheet", "", , , , , 8) If CRg Is Nothing Then Exit Sub Set SRg = Application.InputBox("Please select the output range:", "Copy to Another Sheet", "", , , , , 8) If SRg Is Nothing Then Exit Sub Rg.AdvancedFilter xlFilterCopy, CRg, SRg, False SRg.Worksheet.Activate SRg.Worksheet.Columns.AutoFit End Sub
- अब F5 कुंजी दबाएं या कोड चलाने के लिए Run पर क्लिक करें।

- उपरोक्त क्रिया “Copy to Another Sheet” नामक एक नया डायलॉग बॉक्स खोलेगी।

- उसके बाद, इनपुट बॉक्स पर क्लिक करें। “VBA” नामक शीट पर जाएं और रेंज (B4:D15) चुनें।
- OK दबाएं।

- फिर, एक और डायलॉग बॉक्स दिखाई देगा। हमें उस डायलॉग बॉक्स के इनपुट बॉक्स में मानदंड रेंज का मान डालना होगा। मानदंड डालने के लिए इनपुट बॉक्स पर क्लिक करें, शीट नाम VBA चुनें और उस शीट से रेंज (F9:F11) चुनें।
- उपरोक्त क्रियाएं इनपुट बॉक्स में इस तरह का मान दिखाएंगी:
VBA!$B$4:$D$15
- अब OK दबाएं।

- हम आउटपुट रेंज के लिए एक और डायलॉग बॉक्स देख सकते हैं।
- उस शीट से सेल B4 चुनें जहां हम डेटा कॉपी करना चाहते हैं। यह इनपुट बॉक्स में मान $B$4 डालेगा।
- OK दबाएं

- अंत में, हमें दूसरी शीट में सभी हाइलाइट की गई पंक्तियाँ कॉपी मिलती हैं।

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