Excel में केवल सेल सामग्री पर क्लिक करके डेटा कैसे फ़िल्टर करें?
आम तौर पर, एक्सेल में, आप अपनी आवश्यकता के अनुसार डेटा को फ़िल्टर करने के लिए फ़िल्टर फ़ंक्शन लागू कर सकते हैं। लेकिन, इस लेख में, मैं सिर्फ सेल वैल्यू पर क्लिक करके डेटा को फ़िल्टर करने के तरीके के बारे में बात करूंगा। उदाहरण के तौर पर निम्नलिखित डेटा लें, जब मैं सेल A2 पर डबल क्लिक करता हूं, तो इस क्लिक किए गए मान के आधार पर सभी संबंधित रिकॉर्ड नीचे स्क्रीनशॉट में दिखाए गए अनुसार एक ही बार में फ़िल्टर हो जाएंगे।
केवल VBA कोड वाले सेल मान पर क्लिक करके डेटा फ़िल्टर करें
केवल VBA कोड वाले सेल मान पर क्लिक करके डेटा फ़िल्टर करें
यहां, मैं आपको एक सेल पर क्लिक करके डेटा फ़िल्टर करने के लिए एक वीबीए कोड प्रदान करूंगा, कृपया निम्नानुसार करें:
1. सबसे पहले, अपने डेटा को एक श्रेणी नाम दें, कृपया इसमें एक श्रेणी नाम दर्ज करें नाम बॉक्स, और प्रेस दर्ज कुंजी, स्क्रीनशॉट देखें:
2. शीट टैब पर राइट क्लिक करें जिसे आप सेल पर क्लिक करके फ़िल्टर करना चाहते हैं, और फिर चुनें कोड देखें संदर्भ मेनू से, और खुले में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, निम्न कोड को कॉपी करें और रिक्त मॉड्यूल में पेस्ट करें:
वीबीए कोड: सेल वैल्यू पर क्लिक करके डेटा फ़िल्टर करें:
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby Extendoffice
Dim rgTable As Range
Dim rgData As Range
Dim xColumn As Integer
On Error Resume Next
Application.ScreenUpdating = False
Set rgTable = Range("mydata")
With rgTable
Set rgData = .Offset(1, 0).Resize(.Rows.Count - 1, .Columns.Count)
If Not Application.Intersect(ActiveCell, rgData.Cells) Is Nothing Then
xColumn = ActiveCell.Column - .Column + 1
If ActiveSheet.AutoFilterMode = False Then
.AutoFilter
End If
If ActiveSheet.AutoFilter.Filters(xColumn).On = True Then
.AutoFilter Field:=xColumn
Else
.AutoFilter Field:=xColumn, Criteria1:=ActiveCell.Value
End If
End If
End With
Set rgData = Nothing
Set rgTable = Nothing
Application.ScreenUpdating = True
End Sub
नोट: उपरोक्त कोड में, मेरी जानकारी यह वह श्रेणी नाम है जिसे आपने अपनी डेटा श्रेणी के लिए बनाया है, कृपया इसे अपनी आवश्यकता के अनुसार बदलें।
3. फिर कोड विंडो को सहेजें और बंद करें, अब, जब आप डेटा रेंज के किसी भी सेल पर डबल क्लिक करते हैं जिसे आप फ़िल्टर करना चाहते हैं, तो उसके संबंधित रिकॉर्ड दिखाए गए स्क्रीनशॉट के अनुसार फ़िल्टर किए जाएंगे:
अधिक संबंधित लेख:
सेल पर क्लिक करके सेल वैल्यू कैसे बदलें?
एक्सेल में हेडर पर क्लिक करके कॉलम डेटा को कैसे सॉर्ट करें?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!