Excel में उन्नत फ़िल्टर के साथ डेटा को किसी अन्य वर्कशीट में कैसे कॉपी करें?
आम तौर पर, हम इसे तुरंत लागू कर सकते हैं आधुनिक फ़िल्टर एक ही वर्कशीट में कच्चे डेटा से डेटा निकालने की सुविधा। लेकिन, कभी-कभी, जब आप फ़िल्टर किए गए परिणाम को किसी अन्य वर्कशीट में कॉपी करने का प्रयास करते हैं, तो आपको निम्नलिखित चेतावनी संदेश मिलेगा। इस मामले में, आप एक्सेल में इस कार्य से कैसे निपट सकते हैं?
उन्नत फ़िल्टर सुविधा का उपयोग करके उन्नत फ़िल्टर के साथ डेटा को किसी अन्य वर्कशीट में कॉपी करें
VBA कोड का उपयोग करके उन्नत फ़िल्टर के साथ डेटा को किसी अन्य वर्कशीट में कॉपी करें
उन्नत फ़िल्टर सुविधा का उपयोग करके उन्नत फ़िल्टर के साथ डेटा को किसी अन्य वर्कशीट में कॉपी करें
इस कार्य को हल करने के लिए आपके लिए यहां एक सरल समाधान दिया गया है, कृपया इसे इस प्रकार करें:
1. उन्नत फ़िल्टर फ़ंक्शन का उपयोग करके उस वर्कशीट को सक्रिय करें जहां आप फ़िल्टर किए गए परिणाम की प्रतिलिपि बनाना चाहते हैं।
2। तब दबायें जानकारी > उन्नत, स्क्रीनशॉट देखें:
3. में आधुनिक फ़िल्टर संवाद बॉक्स में, चयन करें किसी अन्य स्थान पर कॉपी करें से कार्य अनुभाग, और फिर क्लिक करें उस डेटा श्रेणी का चयन करने के लिए बटन जिसे आप बगल में किसी अन्य शीट में फ़िल्टर करना चाहते हैं सूची सीमा, क्लिक करते जाइये के बगल में बटन मानदंड सीमा किसी अन्य शीट से मानदंड चुनने के लिए स्क्रीनशॉट देखें:
4। तब दबायें के बगल में बटन को कॉपी उस सेल का चयन करने के लिए बॉक्स पर क्लिक करें जहां आप सक्रिय शीट से फ़िल्टर किए गए परिणाम को आउटपुट करना चाहते हैं, और फिर क्लिक करें OK बटन, फ़िल्टर किए गए परिणाम को आपकी मूल डेटा शीट के आधार पर दूसरी शीट में निकाला गया है।
VBA कोड का उपयोग करके उन्नत फ़िल्टर के साथ डेटा को किसी अन्य वर्कशीट में कॉपी करें
यदि आप वीबीए कोड में कुशल हैं, तो आप निम्नलिखित वीबीए कोड के साथ यह काम पूरा कर सकते हैं।
1. उस वर्कशीट को सक्रिय करें जिसे आप फ़िल्टर करना चाहते हैं और परिणाम को दूसरी शीट पर कॉपी करें।
2. दबाए रखें ALT + F11 एक्सेल में कुंजियाँ, और यह खुलता है अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
3। क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल खिड़की।
वीबीए कोड: उन्नत फ़िल्टर के साथ डेटा को किसी अन्य वर्कशीट में कॉपी करें:
Sub Advancedfiltertoanothersheet()
'Updateby Extendoffice
Dim xStr As String
Dim xAddress As String
Dim xRg As Range
Dim xCRg As Range
Dim xSRg As Range
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the filter range:", "Kutools for Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xCRg = Application.InputBox("Please select the criteria range:", "Kutools for Excel", "", , , , , 8)
If xCRg Is Nothing Then Exit Sub
Set xSRg = Application.InputBox("Please select the output range:", "Kutools for Excel", "", , , , , 8)
If xSRg Is Nothing Then Exit Sub
xRg.AdvancedFilter xlFilterCopy, xCRg, xSRg, False
xSRg.Worksheet.Activate
xSRg.Worksheet.Columns.AutoFit
End Sub
4. और फिर दबाएं F5 इस कोड को चलाने के लिए कुंजी, और एक प्रॉम्प्ट बॉक्स पॉप आउट होता है जिससे आप उस डेटा रेंज का चयन कर सकते हैं जिसे आप फ़िल्टर करना चाहते हैं, स्क्रीनशॉट देखें:
5। तब दबायें OK, और एक अन्य संवाद बॉक्स आपको यह याद दिलाने के लिए पॉप आउट होता है कि आप उस मानदंड श्रेणी का चयन करें जिसके आधार पर आप फ़िल्टर करना चाहते हैं, स्क्रीनशॉट देखें:
6. क्लिक करते जाइये OK, पॉप आउट डायलॉग बॉक्स में, कृपया किसी अन्य नई वर्कशीट से एक सेल का चयन करें जहां आप फ़िल्टर परिणाम आउटपुट करना चाहते हैं, स्क्रीनशॉट देखें:
7. अंत में क्लिक करें OK बटन, फ़िल्टर किए गए डेटा को आपकी आवश्यकता के अनुसार किसी अन्य निर्दिष्ट शीट में आउटपुट कर दिया गया है।
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!