यदि आप त्रुटि संदेश के संभावित कारणों और समाधानों का पता लगाने के लिए संघर्ष कर रहे हैं श्रेणी वर्ग की स्वतः फ़िल्टर विधि विफल तब तो यह लेख तुम्हारे लिए है। तो, आइए मुख्य लेख में गोता लगाएँ।
कार्यपुस्तिका डाउनलोड करें
श्रेणी श्रेणी की ऑटोफ़िल्टर विधि विफल समस्या के लिए 5 समाधान
यहां, हम 5 . दिखाएंगे एक श्रेणी के रूप में निम्नलिखित डेटासेट का उपयोग करके संभावित समाधान जहां हम मानदंड के आधार पर श्रेणी को फ़िल्टर करने के लिए अपनी ऑटोफ़िल्टर सुविधा लागू करेंगे।
हमने Microsoft Excel 365 . का उपयोग किया है यहां संस्करण, आप अपनी सुविधा के अनुसार किसी अन्य संस्करण का उपयोग कर सकते हैं।
ठीक-1 :रेंज क्लास की ऑटोफिल्टर विधि को हल करने के लिए फ़ील्ड नंबर को ठीक करना विफल समस्या
यहां, हम 2500 . से अधिक बिक्री मूल्यों के आधार पर निम्न श्रेणी को फ़िल्टर करने का प्रयास करेंगे VBA . की सहायता से कोड।
श्रेणी को फ़िल्टर करने के लिए हमने निम्नलिखित कोड का उपयोग किया है
Sub fixing_autofilter_issue_1()
Dim sht As Worksheet
Set sht = Worksheets("Field Number")
sht.Range("B3:D3").AutoFilter field:=100, Criteria1:=">=2500"
End Sub
यहां, फ़ील्ड: श्रेणी की कॉलम संख्या को इंगित करने के लिए है, जिसे हमने 100 . को सौंपा है लेकिन 3 . से अधिक नहीं हैं इस श्रेणी में कॉलम।
तो, F5 . दबाने के बाद हमें त्रुटि संदेश मिल रहा है रेंज क्लास की ऑटोफ़िल्टर विधि विफल ।
➤ इस समस्या को हल करने के लिए, श्रेणी की कॉलम संख्या के अनुरूप सही फ़ील्ड संख्या का उपयोग करें (हम 3 का उपयोग कर रहे हैं) क्योंकि यह बिक्री . का क्रमांक है श्रेणी का स्तंभ)।
Sub fixing_autofilter_issue_1()
Dim sht As Worksheet
Set sht = Worksheets("Field Number")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"
End Sub
➤ F5➤ दबाएं .
अब, आप बिना किसी त्रुटि संदेश के मापदंड के अनुसार अपनी सीमा को फ़िल्टर कर सकेंगे।
और पढ़ें: एक्सेल वीबीए यह जांचने के लिए कि ऑटोफिल्टर चालू है या नहीं (4 आसान तरीके)
फिक्स-2 :श्रेणी श्रेणी की विफल समस्या की स्वतः फ़िल्टर विधि को हल करने के लिए एक सही श्रेणी का उपयोग करना
हम बिक्री . के आधार पर निम्नलिखित डेटासेट में फ़िल्टर लागू करने का प्रयास करेंगे $2,500.00 . से अधिक मानों के लिए कॉलम ।
हमने रेंज . की श्रेणी को फ़िल्टर करने के लिए निम्न कोड का उपयोग किया है शीट।
Sub fixing_autofilter_issue_2()
Dim sht As Worksheet
Set sht = Worksheets("Range")
sht.Range("D3:D100").AutoFilter field:=3, Criteria1:=">=2500"
End Sub
यहां, हम देख सकते हैं कि हमने D3:D100 . श्रेणी का उपयोग किया है और फ़ील्ड संख्या 3 , और ये मान आपस में मेल नहीं खाते क्योंकि इस श्रेणी में केवल एक कॉलम है।
तो, F5 . दबाने के बाद हमें फिर से त्रुटि संदेश मिल रहा है।
➤ कोड को निम्नलिखित में सुधारें
Sub fixing_autofilter_issue_2()
Dim sht As Worksheet
Set sht = Worksheets("Range")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"
End Sub
हमने सीमा को B3:D3 . में बदल दिया है अब।
➤ F5➤ दबाएं .
बाद में, आप बिना किसी त्रुटि संदेश के मापदंड के अनुसार अपनी सीमा को फ़िल्टर करने में सक्षम होंगे।
ठीक-3 :श्रेणी श्रेणी की स्वत:फ़िल्टर विधि फ़िल्टरिंग तालिका के कारण विफल समस्या
यहां, हमारे पास निम्न तालिका है जहां हम बिक्री के आधार पर इस तालिका को फ़िल्टर करने के लिए कोड की सहायता से फ़िल्टर विकल्प लागू करने का प्रयास करेंगे कॉलम।
इस उद्देश्य के लिए, हमने निम्नलिखित कोड का उपयोग किया है
Sub fixing_autofilter_issue_3()
Dim sht As Worksheet
Set sht = Worksheets("Table")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"
End Sub
ऐसा लगता है कि इस कोड में सब कुछ ठीक है। आइए इसे जांचें।
लेकिन F5 . दबाने के बाद , हमें त्रुटि संदेश मिल रहा है।
इस समस्या को हल करने के लिए हमें इस तालिका को एक श्रेणी में बदलना होगा।
➤ तालिका का चयन करें और फिर टेबल डिज़ाइन . पर जाएं टैब>> टूल समूह>> रेंज में कनवर्ट करें विकल्प।
फिर, रूपांतरण के बारे में सुनिश्चित करने के लिए एक संदेश बॉक्स दिखाई देगा।
➤ हां . दबाएं यहाँ।
उसके बाद, आपको बनाई गई तालिका से रेंज मिल जाएगी।
➤ अब, पिछले कोड को फिर से लागू करते हैं।
Sub fixing_autofilter_issue_3()
Dim sht As Worksheet
Set sht = Worksheets("Table")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"
End Sub
➤ F5➤ दबाएं .
जैसा कि आप देख सकते हैं, इस बार स्वतः फ़िल्टर विधि ठीक से काम किया।
फिक्स-4 :फ़िल्टरिंग पिवट टेबल के कारण रेंज क्लास की ऑटोफ़िल्टर विधि विफल समस्या
यहां, हमारे पास निम्न पिवट टेबल है जहां हमारे पास दूसरे कॉलम में बिक्री मूल्य हैं, जिसके आधार पर हम ऑटोफिल्टर विधि लागू करेंगे। ।
इसलिए, हमने निम्नलिखित कोड लागू किया है।
Sub fixing_autofilter_issue_4()
Dim sht As Worksheet
Set sht = Worksheets("Pivot")
sht.Range("A3:B3").AutoFilter field:=2, Criteria1:=">=2500"
End Sub
यहाँ, फ़ील्ड संख्या 2 श्रेणी के दूसरे स्तंभ के लिए है A3:B3 ।
F5 pressing दबाने के बाद , आपको त्रुटि संदेश मिलेगा श्रेणी श्रेणी की स्वतः फ़िल्टर विधि विफल ।
इस समस्या को हल करने के लिए आप इस स्वतः फ़िल्टर विधि . को लागू कर सकते हैं पिवट टेबल के सोर्स रेंज में।
जैसा कि आप देख सकते हैं, हमारे पास इस तालिका के लिए स्रोत श्रेणी स्रोत . में स्थित है शीट और यहां हम अपना कोड लागू करेंगे।
➤ इस स्रोत श्रेणी के लिए निम्न कोड लागू करें।
Sub fixing_autofilter_issue_4_1()
Dim sht As Worksheet
Set sht = Worksheets("Source")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"
End Sub
➤ F5➤ दबाएं .
अंततः, आप बिक्री . के लिए दिए गए मानदंड के आधार पर श्रेणी को फ़िल्टर करने में सक्षम होंगे कॉलम।
समाधान-5 :हैडर के बजाय पूरी रेंज का उपयोग करने के कारण समस्या
इस खंड में, हम एक छोटी सी समस्या पर चर्चा करने जा रहे हैं जो शायद ही त्रुटि संदेश उत्पन्न करती है श्रेणी वर्ग की स्वतः फ़िल्टर विधि विफल . लेकिन आप इस तथ्य से अवगत हो सकते हैं कि इस त्रुटि का कारण क्या हो सकता है।
पिछले उदाहरणों की तरह, हम ऑटोफ़िल्टर विधि . लागू करेंगे निम्न श्रेणी के लिए।
फ़िल्टर लगाने के लिए हमने निम्न कोड का उपयोग किया है।
Sub fixing_autofilter_issue_5()
Dim sht As Worksheet
Set sht = Worksheets("Header")
sht.Range("B3:D11").AutoFilter field:=3, Criteria1:=">=2500"
End Sub
यहां, हमने B3:D11 . श्रेणी का उपयोग किया है पूरे डेटासेट के लिए जो अनावश्यक है, और कभी-कभी यह एक बड़ी रेंज के लिए उस त्रुटि संदेश का कारण हो सकता है।
इसलिए, हम केवल हेडर को एक श्रेणी के रूप में उपयोग करके उस कोड को निम्नलिखित में बदल सकते हैं।
Sub fixing_autofilter_issue_5()
Dim sht As Worksheet
Set sht = Worksheets("Header")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"
End Sub
F5 pressing दबाने के बाद , आप बिना किसी समस्या का सामना किए अपना वांछित परिणाम प्राप्त करेंगे।
निष्कर्ष
इस लेख में, हमने विफल श्रेणी श्रेणी की ऑटोफ़िल्टर विधि के संभावित सुधारों को कवर करने का प्रयास किया है। एक्सेल में समस्या। आशा है कि आपको यह उपयोगी लगेगा। यदि आपके कोई सुझाव या प्रश्न हैं, तो बेझिझक उन्हें टिप्पणी अनुभाग में साझा करें।
संबंधित लेख
- Excel VBA के साथ दृश्यमान पंक्तियों को ऑटोफ़िल्टर और कॉपी कैसे करें
- VBA ऑटोफिल्टर:सबसे छोटे से सबसे बड़े तक छाँटें (3 तरीके)
- Excel में VBA के साथ एक निश्चित मान के बराबर नहीं होने वाले मानों को ऑटोफ़िल्टर कैसे करें
- Excel VBA:मौजूद होने पर ऑटोफ़िल्टर निकालें (7 उदाहरण)