सामग्री तालिका
VBA मा DIR प्रकार्यले मुख्यतया तपाईँलाई दिइएको फोल्डरबाट डाइरेक्टरी वा फाइलहरू देखाउँछ। यसले यो प्रकार्यको साथ पहिलो फाइल पनि फर्काउन सक्छ। यो प्रकार्यले विशेष फाइलहरू र फोल्डरहरू प्राप्त गर्न धेरै प्रयोगहरू छन्। तपाईले केवल VBA कोडको पथनाममा फाइल पथ घुसाउन आवश्यक छ। तपाईंलाई VBA DIR कोडहरू प्रयोग गर्न गाह्रो लाग्न सक्छ। चिन्ता नगर्नुहोस्, यस लेखमा, हामी तपाईंलाई VBA DIR प्रकार्य प्रयोग गर्नको लागि राम्रो दृश्यको लागि केही उदाहरणहरू देखाउन जाँदैछौं। आशा छ तपाईले लेख पढिसके पछि प्रकार्य प्रयोग गर्न सक्षम हुनुहुनेछ। त्यसोभए, सुरु गरौं।
अभ्यास कार्यपुस्तिका डाउनलोड गर्नुहोस्
निम्न अभ्यास कार्यपुस्तिका डाउनलोड गर्नुहोस्। यसले तपाईंलाई विषय राम्रोसँग बुझ्न मद्दत गर्नेछ।
DIR Function.xlsm
DIR प्रकार्यको परिचय
सारांश:
VBA DIR प्रकार्यले दिइएको फोल्डर पथबाट फाइल वा डाइरेक्टरीको नाम फर्काउँछ। परम्परागत रूपमा, यसले पहिलो फाइल फर्काउँछ।
सिन्ट्याक्स:
Dir [ (pathname, [ attributes ] ) ] तर्क स्पष्टीकरण:
<16 विशेषताहरू| तर्क | आवश्यक/वैकल्पिक | स्पष्टीकरण |
|---|---|---|
| PathName | वैकल्पिक | Path फाइल पहुँच गर्न र निर्दिष्ट गर्न |
| ऐच्छिक | स्थिर वा संख्यात्मक अभिव्यक्ति ले मिल्दो फाइलहरूको विशेषताहरू निर्दिष्ट गर्दछ |
त्यहाँ केही पूर्व-परिभाषित विशेषताहरू, तिनीहरू हुन्-
| विशेषता नाम | विवरण |
|---|---|
| vbNormal | फाइलहरू कुनै विशेष विशेषताहरू बिना |
| vbReadOnly | पढ्नका लागि मात्र फाइलहरू कुनै विशेषताहरू बिना |
| vbHidden | लुकेन विशेषताहरू नभएका फाइलहरू |
| vbSystem | विशिष्टता नभएका प्रणाली फाइलहरू |
| vbVolume | भोल्युम लेबल |
| vbDirectory | विशेषता नभएका निर्देशिका वा फोल्डरहरू |
| vbAlias | निर्दिष्ट फाइलनाम एउटा उपनाम हो<17 |
7 एक्सेलमा VBA DIR प्रकार्य प्रयोग गर्ने उदाहरणहरू
विवरणबाट, तपाईंले बुझ्नुभएको हुन सक्छ कि VBA DIR प्रकार्यले प्रदान गर्दछ। प्रदान गरिएको पथनामबाट फाइल नाम। उदाहरणबाट बुझौं। यहाँ हामीले एउटा डाइरेक्टरी सिर्जना गरेका छौं Exceldemy_Folder तपाईंलाई विभिन्न उदाहरणहरू देखाउन। यस फोल्डरमा विभिन्न साना फोल्डरहरू र फाइलहरू छन्।
१. पथबाट फाइलनाम फेला पार्नुहोस्
हाम्रो फोल्डरमा, हामीले एउटा विशेष फाइल फेला पार्न सक्छौँ। फाइल नाम पथ घोषणा गर्दै।
फाइलको पथ प्रतिलिपि गरेपछि, तपाईंले कोड चलाउन आवश्यक छ।
यस कारणको लागि, विकासकर्ता ट्याब >> मा जानुहोस्। भिजुअल बेसिक छान्नुहोस्। त्यसपछि Insert ट्याब >> मा जानुहोस्। मोड्युल चयन गर्नुहोस्। सामान्य संवाद बाकसमा, हामी कोड लेख्छौँ।
25>
हाम्रो एजेन्डा <1 फेला पार्ने हो।>Filename pathname बाट, हामी सेट गर्नेछौंपूर्ण पाथनेम (मूलबाट फाइलमा) र हाम्रो कोड हुनेछ
8037
यहाँ हाम्रो कोड भित्र, हामीले पथनामलाई E:\Exceldemy\Sales_of_January को रूपमा सेट गरेका छौं। xlsx
कोड ब्रेकडाउन:
- सुरुमा हामीले FN<भनिने स्ट्रिङ भेरिएबल घोषणा गर्यौं। २>। र Dir प्रकार्यको आउटपुट यस भेरिएबलमा सुरक्षित गरिएको थियो।
- अर्को, Dir प्रकार्यले फाइलको नाम फेला पार्छ र प्रदान गरिएको मार्गबाट फिर्ता गर्छ।<29
- त्यसपछि MsgBox सन्देश बक्स मार्फत आउटपुट सेट गर्दछ। MsgBox ले सन्देश बाकस प्रयोग गरेर आउटपुट फर्काउँछ।
- त्यसपछि, F5 कुञ्जीसँग कोड चलाउनुहोस्।
अन्तमा, हामीले Sales_of_January.xlsx नामक फाइल फेला पारेका छौं।
2. डाइरेक्टरीको अस्तित्व जाँच गर्नुहोस्
हामी Dir प्रकार्य प्रयोग गरेर डाइरेक्टरीको अस्तित्व जाँच गर्न सक्छौं। Exceldemy फोल्डर अवस्थित छ कि छैन भनेर जाँच गर्न कोड लेखौं। सामान्य बाकसमा निम्न कोड लेख्नुहोस् र यसलाई F5 कुञ्जीसँग चलाउनुहोस्।
4971
कोड ब्रेकडाउन :
- हामीले दुई चर घोषणा गरेका छौं; PN मा हाम्रो जाँच डाइरेक्टरीको पूरा पथनाम समावेश छ।
- यहाँ Dir प्रकार्य भित्र, हामीले दुईवटा मानहरू सेट गरेका छौं, पथनाम र विशेषता। मान vbDirectory को रूपमा। यो विशेषता मान डाइरेक्टरी पत्ता लगाउन मद्दत गर्नेछ। र यस प्रकार्यको आउटपुट मा भण्डारण गरिन्छ फाइल चर।
- त्यसपछि हामीले भेरिएबल खाली छ वा छैन भनेर जाँच्यौँ। यदि हामीले भेरिएबल नभएको फेला पार्छौं भने, सन्देश बाकस मार्फत डाइरेक्टरीको अस्तित्व घोषणा गर्नुहोस्, अन्यथा, रिटर्न अवस्थित छैन।
यहाँ, Exceldemy डाइरेक्टरी अवस्थित छ, त्यसैले हामीले " Exceldemy अवस्थित " फेला पार्नेछौं, जहाँ Exceldemy फोल्डरको नाम हो।
3. अवस्थित नभएको फोल्डर सिर्जना गर्नुहोस्
तपाईले तपाइँको पीसीमा अवस्थित नभएको फोल्डर सिर्जना गर्न सक्नुहुन्छ। यसको लागि, तपाईंले आफ्नो फोल्डरहरूमा अवस्थित नभएको पथनाम सिर्जना गर्नुपर्छ। कल्पना गरौं हामी Exceldemy_1 नामक डाइरेक्टरी सिर्जना गर्न गइरहेका छौं। हामी डाइरेक्टरी सिर्जना गर्न MkDir आदेश प्रयोग गर्नेछौं, तर त्यस अघि, हामीले निम्न VBA कोड लेख्न आवश्यक छ।
6719
यहाँ हामीले हाम्रो कोडको Else ब्लकबाट pathname प्रयोग गरेर डाइरेक्टरी सिर्जना गर्न आदेश लेखेका छौं। F5 कुञ्जीसँग कोड रन ।
35>
डाइरेक्टरी सिर्जना गरिएको छ। डाइरेक्टरी फोल्डर हेरौं। Exceldemy_1 फोल्डर अब तपाइँको कम्प्युटरमा देखिने छ।
36>
समान पढाइहरू:
- एक्सेलमा VBA मा सबलाई कसरी कल गर्ने (4 उदाहरणहरू)
- VBA प्रकार्यमा मान फिर्ता गर्नुहोस् (दुवै एरे र गैर-एरे मानहरू)<2
- एक्सेलमा VBA UCASE प्रकार्य प्रयोग गर्नुहोस् (4 उदाहरणहरू)
- मा कसरी TRIM प्रकार्य प्रयोग गर्नेएक्सेलमा VBA (परिभाषा + VBA कोड)
4. डाइरेक्टरीबाट पहिलो फाइल फेला पार्नुहोस्
Dir प्रकार्यको मुख्य कार्य हो प्रदान गरिएको डाइरेक्टरीमा पहिलो फाइल फेला पार्न। तपाईंले प्रकार्य भित्र प्रदान गर्न आवश्यक सबै पाथनेम हो (कन्टेनर डाइरेक्टरी सम्म), र यसले त्यो डाइरेक्टरीबाट पहिलो फाइल फिर्ता गर्नेछ।
हाम्रो बाट पहिलो फाइल फेला पारौं। Exceldemy निर्देशिका। हाम्रो कोड हुनेछ
6902
तपाईँ आधारभूत कोड हेर्न सक्नुहुन्छ; हामीले पथनामलाई Dir प्रकार्यमा पास गरेका छौं। अब F5 कुञ्जीसँग कोड रन गर्नुहोस्, तपाईंले यो डाइरेक्टरीमा पहिलो फाइल फेला पार्नुहुनेछ।
38>
5. सबै फेला पार्नुहोस्। डाइरेक्टरीबाट फाइलहरू
अघिल्लो खण्डमा, हामीले डाइरेक्टरीबाट पहिलो फाइल नाम कसरी फेला पार्ने भनेर हेरेका छौं। स्थिति उत्पन्न हुन सक्छ जब तपाइँ एक विशेष डाइरेक्टरीबाट सबै फाइलहरू फेला पार्न आवश्यक छ। निर्दिष्ट डाइरेक्टरीमा सबै फाइलहरू फेला पार्न, तपाईंले निम्न VBA कोड लेख्नुपर्छ।
1454
फाइल नामहरू भण्डारण गर्नका लागि यहाँ दुई चरहरू छन्। एकल ( FN ), र सूचीको रूपमा ( FL )। Do while लुप डाइरेक्टरीमा कुनै पनि फाइल नराखेसम्म दोहोरिन्छ, यो लुप प्रयोग गरेर, हामी प्रत्येक फाइल नामलाई FL चरमा पुश गर्छौँ।
कोड कार्यान्वयन गर्नुहोस्, र तपाईले तलको छवि जस्तै डाइरेक्टरीमा सबै फाइलहरू फेला पार्नुहुनेछ।
6. डाइरेक्टरीबाट सबै फाइल र फोल्डरहरू फेला पार्नुहोस्
हामीसबै फाइलहरू कहाँ फेला पार्ने भनेर अघिल्लो खण्डमा उल्लेख गरेको छ। हामी फोल्डरमा सबै उप-फोल्डरहरू पनि फेला पार्न सक्छौं। यो गर्नको लागि, हामीले तल संलग्न गरेका निम्न VBA कोड लेख्नुहोस्।
1762
हाम्रो कोडमा परिवर्तन भनेको विशेषता प्यारामिटरहरूको प्रयोग मात्र हो। हामीले त्यो फिल्डमा vbDirectory प्रयोग गरेका छौं। रन कोड, र तपाईंले Exceldemy_Folder का सबै फाइलहरू र सबफोल्डरहरू फेला पार्नुहुनेछ।
42>
7 एक विशेष प्रकारका सबै फाइलहरू फेला पार्नुहोस्
VBA Dir प्रकार्य प्रयोग गरेर, हामी कुनै पनि विशेष प्रकारको फाइल फेला पार्न सक्छौं। उदाहरणका साथ अन्वेषण गरौं।
हामी हाम्रो डाइरेक्टरीबाट .csv फाइलहरू फेला पार्न जाँदैछौँ। हाम्रो कोड निम्न जस्तै हुनेछ-
5389
हामी आशा गर्दछौं कि तपाईंले कोड बुझ्नुभएको छ, जसले फाइलहरू फेला पार्नको लागि समान संयन्त्र प्रयोग गर्दछ। पथनाममा, हामीले वाइल्डकार्ड ( * ) प्रयोग गर्यौं। यो तारा चिन्ह (*) कुनै पनि संख्या सम्म कुनै पनि वर्ण हुन सक्छ भनेर जनाउँछ। वाइल्डकार्ड यसरी प्रयोग गरिएको छ कि फाइलको नाम कुनै पनि हुन सक्छ तर .csv फाइल हुनुपर्छ।
जब तपाईंले कोड चलाउनुहुन्छ, यसले फर्काउनेछ। csv फाइलहरू हाम्रो Exceldemy निर्देशिकाबाट।
44>
अभ्यास खण्ड
हामीले अभ्यास प्रदान गरेका छौं तपाईंको अभ्यासको लागि दाहिने छेउमा प्रत्येक पानाको खण्ड। कृपया यो आफै गर्नुहोस्।
निष्कर्ष
यो आजको सत्रको बारेमा हो। र यी केही सरल उदाहरणहरू छन्एक्सेलमा VBA Dir प्रकार्यको। यदि तपाइँसँग कुनै प्रश्न वा सुझावहरू छन् भने कृपया हामीलाई टिप्पणी सेक्सनमा थाहा दिनुहोस्। राम्रो बुझ्नको लागि, कृपया अभ्यास पाना डाउनलोड गर्नुहोस्। हाम्रो वेबसाइटमा जानुहोस्, Exceldemy , एक-स्टप एक्सेल समाधान प्रदायक, विभिन्न प्रकारका एक्सेल विधिहरू बारे पत्ता लगाउन। यो लेख पढेर धैर्यताको लागि धन्यवाद।
