डेटासेट जनवरी, फरवरी और मार्च 2022 में विभिन्न तिथियों पर इलेक्ट्रॉनिक उत्पादों की बिक्री मात्रा को प्रदर्शित करता है।
विधि 1- एडवांस्ड फ़िल्टर को तिथि सीमा पर लागू करने के लिए सॉर्ट और फ़िल्टर विकल्प का उपयोग करें
चरण:
- नीचे दिखाए अनुसार 3 कॉलम हेडर बनाएं: Date, Products और Sales Qty.
- Date कॉलम में, वह मानदंड या सीमा दर्ज करें जिसे आप लागू करना चाहते हैं। यहां, 31 जनवरी 2022 के बाद की बिक्री निकालें।
- F6 में, >1/31/2022 दर्ज करें।
- OK पर क्लिक करें।
>1/31/2022 31 जनवरी 2022 के बाद की तिथि को इंगित करता है।
मानदंड के आधार पर डेटा फ़िल्टर करने के लिए:
- संपूर्ण डेटासेट B4:D14 चुनें।
- Data टैब पर जाएं और Sort & Filter में Advanced चुनें।
- Advanced Filter में, Copy to another location चुनें।
- List range चयनित रेंज दिखा रहा है, क्योंकि पूरा डेटासेट चुना गया था।
- Criteria Range में $F$4:$H$5 दर्ज करें।
- Copy to में $F$7 दर्ज करें।
- आउटपुट देखने के लिए Enter दबाएं।
- आप मानदंड बदल सकते हैं और तिथि सीमा, Products या Sales Qty के आधार पर एडवांस्ड फ़िल्टरिंग लागू कर सकते हैं।
विधि 2 - तिथि सीमा के लिए एडवांस्ड फ़िल्टर का उपयोग करने के लिए एक्सेल VBA लागू करना
चरण:
- 2 कॉलम हेडर बनाएं: Start और End Date।
जनवरी 2022 की बिक्री के बारे में जानकारी निकालने के लिए, Start तिथि को 1 जनवरी और End तिथि को 31 जनवरी के रूप में दर्ज करें।
- VBA कोड में मानदंड घोषित करने के लिए, हेडर समान होना चाहिए।
- F8 में, निम्नलिखित फॉर्मूला दर्ज करें:
- OK पर क्लिक करें।
= ">=" & F5 F5 से मान कॉपी करता है और एक मानदंड सेट करता है। मानदंड उस मान से अधिक या बराबर को इंगित करता है। फॉर्मूला F8 में मानदंड को 1 जनवरी 2022 से अधिक या बराबर के रूप में सेट करता है।
- G8 में, निम्नलिखित फॉर्मूला दर्ज करें:
- OK पर क्लिक करें।
= "<=" & G5 G5 में मान कॉपी करता है और एक मानदंड सेट करता है। मानदंड उस मान से कम या बराबर है। फॉर्मूला G8 में मानदंड को 31 जनवरी 2022 से कम या बराबर के रूप में सेट करता है।
- Developer टैब पर जाएं और Visual Basic पर क्लिक करें।
- Microsoft Visual Basic Application विंडो में, Insert >> Module पर क्लिक करें।
- मॉड्यूल में निम्नलिखित कोड दर्ज करें:
Sub myAdvancedFilterForDateRange()
Dim eb As Workbook
Dim es As Worksheet
Dim Rg As Range
Dim CRg As Range
Dim DRg As Range
Set eb = ThisWorkbook
Set es = eb.Worksheets("VBA Code")
Set Rg = es.Range("B4").CurrentRegion
Set CRg = es.Range("F7").CurrentRegion
Set DRg = es.Range("F10")
DRg.CurrentRegion.Clear
Rg.AdvancedFilter xlFilterCopy, CRg, DRg
End Sub
- Rg वेरिएबल डेटासेट की प्रारंभिक रेंज है। CRg वेरिएबल मानदंड का प्रारंभिक बिंदु है और DRg वेरिएबल वह प्रारंभिक स्थान है जहां परिणामी डेटासेट दिखाया जाएगा।
- DRg.CurrentRegion.Clear क्षेत्र को साफ़ करता है।
- Rg.AdvancedFilter xlFilterCopy, CRg, DRg एडवांस्ड फ़िल्टरिंग प्रक्रिया को इंगित करता है।
- निम्नलिखित आइकन पर क्लिक करके कोड चलाएं:
- जनवरी 2022 के लिए बिक्री जानकारी प्रदर्शित होती है।
प्रैक्टिस वर्कबुक डाउनलोड करें
निम्नलिखित वर्कबुक डाउनलोड करें।
<< एडवांस्ड फ़िल्टर पर वापस जाएं | एक्सेल में फ़िल्टर | एक्सेल सीखें
मुफ्त उन्नत एक्सेल अभ्यास समाधान के साथ प्राप्त करें!
