Excel में किसी विशिष्ट सेल मान के आधार पर पिवट तालिका को कैसे फ़िल्टर करें?
आम तौर पर, हम ड्रॉप-डाउन सूची में आइटम का चयन करके पिवट टेबल में डेटा फ़िल्टर कर रहे हैं जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है। दरअसल, आप किसी विशिष्ट सेल में मान के आधार पर पिवट टेबल को फ़िल्टर कर सकते हैं। इस आलेख में दी गई VBA विधि आपको समस्या का समाधान करने में सहायता करेगी.
VBA कोड के साथ विशिष्ट सेल मान के आधार पर पिवट तालिका फ़िल्टर करें
VBA कोड के साथ विशिष्ट सेल मान के आधार पर पिवट तालिका फ़िल्टर करें
निम्नलिखित वीबीए कोड एक्सेल में विशिष्ट सेल मान के आधार पर पिवट टेबल को फ़िल्टर करने में आपकी सहायता कर सकता है। कृपया निम्नानुसार करें.
1. कृपया एक मान दर्ज करें जिसके आधार पर आप पिवट टेबल को पहले से एक सेल में फ़िल्टर करेंगे (यहां मैं सेल H6 का चयन करता हूं)।
2. वर्कशीट खोलें जिसमें पिवोट टेबल है जिसे आप सेल वैल्यू के आधार पर फ़िल्टर करेंगे। फिर शीट टैब पर राइट क्लिक करें और संदर्भ मेनू से व्यू कोड चुनें। स्क्रीनशॉट देखें:
3. उद्घाटन में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, नीचे दिए गए VBA कोड को कोड विंडो में कॉपी करें।
वीबीए कोड: सेल वैल्यू के आधार पर पिवट टेबल को फ़िल्टर करें
Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 20180702
Dim xPTable As PivotTable
Dim xPFile As PivotField
Dim xStr As String
On Error Resume Next
If Intersect(Target, Range("H6:H7")) Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Set xPTable = Worksheets("Sheet1").PivotTables("PivotTable2")
Set xPFile = xPTable.PivotFields("Category")
xStr = Target.Text
xPFile.ClearAllFilters
xPFile.CurrentPage = xStr
Application.ScreenUpdating = True
End Sub
नोट्स: कोड में,
4। दबाएं ऑल्ट + Q बंद करने के लिए कुंजियाँ अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
फिर नीचे दिखाए गए स्क्रीनशॉट के अनुसार सेल H6 में मान के आधार पर पिवट तालिका फ़िल्टर की जा रही है:
आप आवश्यकतानुसार सेल वैल्यू को अन्य में बदल सकते हैं।
नोट: सेल H6 में आपके द्वारा टाइप किए गए मान पिवट टेबल की श्रेणी ड्रॉप डाउन सूची के मानों से बिल्कुल मेल खाने चाहिए।
संबंधित आलेख:
- एक्सेल में एकाधिक शीटों को एक पिवट टेबल में कैसे संयोजित करें?
- Excel में टेक्स्ट फ़ाइल से पिवट टेबल कैसे बनाएं?
- एक्सेल में पिवट टेबल फ़िल्टर को एक निश्चित सेल से कैसे लिंक करें?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!