Բովանդակություն
DIR ֆունկցիան VBA -ում հիմնականում ցույց է տալիս ձեզ տվյալ թղթապանակի գրացուցակը կամ ֆայլերը: Այն կարող է նաև վերադարձնել առաջին ֆայլը այս գործառույթով: Այս ֆունկցիան ունի բազմաթիվ կիրառումներ՝ որոշակի ֆայլեր և թղթապանակներ ստանալու համար: Այն ամենը, ինչ ձեզ հարկավոր է, պարզապես մուտքագրեք ֆայլի ուղին VBA կոդի ուղու անվան մեջ: Հնարավոր է, որ ավելի դժվար լինի օգտագործել VBA DIR կոդերը: Մի անհանգստացեք, այս հոդվածում մենք ձեզ ցույց կտանք մի քանի օրինակ՝ VBA DIR գործառույթն ավելի լավ պատկերացնելու համար: Հուսով ենք, որ հոդվածը կարդալուց հետո դուք կկարողանաք օգտագործել գործառույթը: Այսպիսով, եկեք սկսենք:
Ներբեռնեք Practice Workbook
Ներբեռնեք հետևյալ գործնական աշխատանքային գիրքը: Դա կօգնի ձեզ ավելի լավ հասկանալ թեման:
DIR Function.xlsm
Ներածություն DIR ֆունկցիայի
Ամփոփում.
VBA DIR ֆունկցիան վերադարձնում է ֆայլի կամ գրացուցակի անունը տվյալ թղթապանակի ճանապարհից: Պայմանականորեն այն վերադարձնում է առաջին ֆայլը:
Շարահյուսություն:
Dir [ (pathname, [ attributes ] ) ] Փաստարկների բացատրություն.
| Փաստարկ | Պարտադիր/կամընտիր | Բացատրություն |
|---|---|---|
| PathName | Ընտրովի | Ուղին ֆայլը մուտք գործելու և սահմանելու համար |
| Հատկանիշներ | կամընտիր | Հաստատուն կամ թվային արտահայտությունը նշում է համապատասխանող ֆայլերի հատկանիշները |
Կան մի քանի նախնականսահմանված հատկանիշներ, դրանք են-
| Հատկանիշի անունը | Նկարագրություն |
|---|---|
| vbNormal | Ֆայլեր առանց հատուկ հատկանիշների |
| vbReadOnly | Միայն կարդալու ֆայլեր առանց հատկանիշների |
| vbHidden | Թաքնված ֆայլեր առանց ատրիբուտների |
| vbSystem | Համակարգային ֆայլեր առանց ատրիբուտների |
| vbVolume | Volume label |
| vbDirectory | Տեղեկացուցակներ կամ թղթապանակներ առանց ատրիբուտների |
| vbAlias | Նշված ֆայլի անունը կեղծանուն է |
Excel-ում VBA DIR ֆունկցիայի օգտագործման 7 օրինակներ
Նկարագրությունից դուք կարող եք հասկացել, որ VBA DIR ֆունկցիան ապահովում է ֆայլի անունը տրված ուղու անունից: Եկեք դա հասկանանք օրինակով. Այստեղ մենք ստեղծել ենք գրացուցակ Exceldemy_Folder ՝ ձեզ տարբեր օրինակներ ցույց տալու համար: Այս թղթապանակում կան տարբեր փոքր թղթապանակներ և ֆայլեր:
1. Գտեք Ֆայլի անունը Path-ից
Մեր թղթապանակում մենք կարող ենք գտնել որոշակի ֆայլ հայտարարելով ֆայլի անվան ուղին:
Ֆայլի ուղին պատճենելուց հետո դուք պետք է գործարկեք կոդը:
Այդ պատճառով անցեք Developer ներդիր >> ընտրել Visual Basic : Այնուհետև անցեք Տեղադրել ներդիր >> ընտրեք Մոդուլ: Ընդհանուր երկխոսության դաշտում մենք գրում ենք կոդը:
Քանի որ մեր օրակարգում է գտնել Ֆայլի անուն ուղու անունից մենք կսահմանենքամբողջական ուղու անունը (հենց արմատից մինչև ֆայլ) և մեր կոդը կլինի
4510
Այստեղ մեր կոդի մեջ մենք ուղու անունը դրել ենք որպես E:\Exceldemy\Sales_of_January: xlsx
Code Breakdown:
- Սկզբում մենք հայտարարագրեցինք տողային փոփոխական, որը կոչվում էր FN . Եվ Dir ֆունկցիայի ելքը պահվել է այս փոփոխականում:
- Հաջորդում Dir ֆունկցիան գտնում է ֆայլի անունը և վերադարձնում այն տրամադրված ճանապարհից:
- Այնուհետև MsgBox -ը սահմանում է ելքը հաղորդագրության տուփի միջոցով: MsgBox վերադարձնում է արդյունքը հաղորդագրության տուփի միջոցով:
- Այնուհետև գործարկեք կոդը F5 ստեղնով:
Վերջապես մենք գտանք Sales_of_January.xlsx անունով ֆայլը։
2. Ստուգեք տեղեկատուի առկայությունը
Մենք կարող ենք ստուգել գրացուցակի առկայությունը՝ օգտագործելով Dir գործառույթը: Եկեք գրենք կոդը՝ ստուգելու համար, թե արդյոք կա Exceldemy թղթապանակը: Ընդհանուր վանդակում գրեք հետևյալ կոդը և գործարկեք այն F5 ստեղնով:
6695
Code Breakdown :
- Մենք հայտարարագրել ենք երկու փոփոխական; PN պարունակում է մեր ստուգող գրացուցակի ամբողջական ուղու անունը:
- Այստեղ Dir ֆունկցիայի շրջանակներում մենք սահմանել ենք երկու արժեք՝ pathname և հատկանիշ: արժեքը որպես vbDirectory : Այս հատկանիշի արժեքը կօգնի հայտնաբերել գրացուցակը: Եվ այս ֆունկցիայի ելքը պահվում է Ֆայլ փոփոխական։
- Այնուհետև մենք ստուգեցինք՝ փոփոխականը դատարկ է, թե ոչ։ Եթե մենք գտնում ենք, որ փոփոխականը չկա, ապա հայտարարեք գրացուցակի գոյությունը հաղորդագրության տուփի միջոցով, հակառակ դեպքում վերադարձը գոյություն չունի:
Այստեղ՝ Exceldemy գրացուցակը գոյություն ունի, ուստի մենք կգտնենք « Exceldemy exists », որտեղ Exceldemy թղթապանակի անունն է։
3. Ստեղծեք թղթապանակ, որը գոյություն չունի
Դուք կարող եք ստեղծել թղթապանակ, որը գոյություն չունի ձեր համակարգչի վրա: Դրա համար դուք պետք է ստեղծեք ուղու անուն, որը գոյություն չունի ձեր թղթապանակներում: Եկեք պատկերացնենք, որ մենք պատրաստվում ենք ստեղծել գրացուցակ, որը կոչվում է Exceldemy_1 : Գրացուցակը ստեղծելու համար մենք կօգտագործենք MkDir հրամանը, սակայն մինչ այդ մենք պետք է գրենք հետևյալ VBA կոդը։
9776
Այստեղ մենք հրաման ենք գրել գրացուցակը ստեղծելու համար՝ օգտագործելով մեր կոդի Else բլոկի ուղու անունը: Գործարկեք կոդը F5 ստեղնով:
Գրացուցակը ստեղծվել է: Եկեք նայենք գրացուցակի թղթապանակին: Exceldemy_1 թղթապանակն այժմ տեսանելի է ձեր համակարգչում:
Նման ընթերցումներ.
- Ինչպես կանչել ենթահաշիվը VBA-ում Excel-ում (4 օրինակ)
- Վերադարձնել արժեք VBA ֆունկցիայում (և զանգվածային և ոչ զանգվածային արժեքներ)
- Օգտագործել VBA UCASE ֆունկցիան Excel-ում (4 օրինակ)
- Ինչպես օգտագործել TRIM ֆունկցիանVBA Excel-ում (Սահմանում + VBA կոդ)
4. Գտնել առաջին ֆայլը գրացուցակից
Dir գործառույթի հիմնական խնդիրն է. տրամադրված գրացուցակում առաջին ֆայլը գտնելու համար: Այն ամենը, ինչ դուք պետք է տրամադրեք ֆունկցիայի ներսում, ուղու անունն է (մինչև կոնտեյների գրացուցակը), և այն կվերադարձնի հենց առաջին ֆայլը այդ գրացուցակից:
Եկեք գտնենք առաջին ֆայլը մեր Exceldemy տեղեկատու: Մեր կոդը կլինի
7629
Դուք կարող եք տեսնել հիմնական կոդը; մենք ուղու անունը փոխանցել ենք Dir ֆունկցիային: Այժմ Գործարկեք կոդը F5 ստեղնով, դուք կգտնեք այս գրացուցակի առաջին ֆայլը:
5. Գտնել բոլորը Ֆայլեր գրացուցակից
Նախորդ բաժնում մենք տեսանք, թե ինչպես կարելի է գտնել առաջին ֆայլի անունը գրացուցակից: Իրավիճակը կարող է առաջանալ, երբ ձեզ անհրաժեշտ է գտնել բոլոր ֆայլերը կոնկրետ գրացուցակից: Հատուկ գրացուցակում բոլոր ֆայլերը գտնելու համար դուք պետք է գրեք հետևյալ VBA կոդը:
6836
Ահա երկու փոփոխական՝ ֆայլերի անունները որպես պահելու համար: սինգլ ( FN ) և որպես ցուցակ ( FL ): Do while ցիկլը կրկնվում է մինչև գրացուցակում որևէ ֆայլ չմնա, օգտագործելով այս հանգույցը, մենք յուրաքանչյուր ֆայլի անունը մղում ենք FL փոփոխականի մեջ:
Կատարեք կոդը, և դուք կգտնեք բոլոր ֆայլերը գրացուցակում, ինչպես ստորև նկարում:
6. Գտեք բոլոր ֆայլերն ու թղթապանակները գրացուցակից
ՄենքՆախորդ բաժնում նշել են, թե որտեղ կարելի է գտնել բոլոր ֆայլերը: Մենք կարող ենք նաև գտնել բոլոր ենթաթղթապանակները թղթապանակում: Դա անելու համար գրեք հետևյալ VBA կոդը, որը մենք կցել ենք ստորև։
8548
Մեր կոդի փոփոխությունը պարզապես հատկանիշի պարամետրերի օգտագործումն է։ Այդ դաշտում մենք օգտագործել ենք vbDirectory : Գործարկեք կոդը, և դուք կգտնեք Exceldemy_Folder -ի բոլոր ֆայլերն ու ենթաթղթապանակները:
7 Գտեք որոշակի տեսակի բոլոր ֆայլերը
Օգտագործելով VBA Dir գործառույթը, մենք կարող ենք գտնել որևէ որոշակի տեսակի ֆայլ: Եկեք ուսումնասիրենք օրինակով:
Մենք պատրաստվում ենք գտնել .csv ֆայլեր մեր գրացուցակից: Մեր կոդը նման կլինի հետևյալին-
3821
Հուսով ենք, որ դուք հասկացել եք կոդը, որն օգտագործում է ֆայլեր գտնելու նմանատիպ մեխանիզմ: Ուղու անվանման մեջ մենք օգտագործել ենք նիշ ( * ): Այս աստղանիշը (*) ցույց է տալիս, որ ցանկացած նիշ մինչև ցանկացած թիվ կարող է առաջանալ: Նշանն օգտագործվել է այնպես, որ ֆայլի անունը կարող է լինել ամեն ինչ, բայց պետք է լինի .csv ֆայլ:
Երբ գործարկեք կոդը, այն կվերադարձնի : csv ֆայլեր մեր Exceldemy գրացուցակից:
Պրակտիկա բաժին
Մենք տրամադրել ենք պրակտիկա ձեր պրակտիկայի համար աջ կողմում գտնվող յուրաքանչյուր թերթիկի հատվածը: Խնդրում ենք դա անել ինքներդ:
Եզրակացություն
Այս ամենը այսօրվա նիստի մասին է: Եվ սրանք մի քանի հեշտ օրինակներ ենExcel-ում VBA Dir ֆունկցիայից: Խնդրում ենք տեղեկացնել մեզ մեկնաբանությունների բաժնում, եթե ունեք հարցեր կամ առաջարկություններ: Ավելի լավ հասկանալու համար խնդրում ենք ներբեռնել պրակտիկայի թերթիկը: Այցելեք մեր կայք՝ Exceldemy , Excel-ի միանգամյա լուծումների մատակարար, պարզելու Excel-ի տարբեր տեսակի մեթոդների մասին: Շնորհակալություն այս հոդվածը կարդալու ձեր համբերության համար:
