Jedwali la yaliyomo
Kitendaji cha DIR katika VBA hukuonyesha hasa saraka au faili kutoka kwa folda fulani. Inaweza pia kurudisha faili ya kwanza na chaguo hili la kukokotoa. Kitendaji hiki kina matumizi mengi kupata faili na folda maalum. Wote unahitaji kuingiza tu njia ya faili katika jina la njia ya msimbo wa VBA . Unaweza kupata ugumu zaidi kutumia misimbo ya VBA DIR . Usijali, katika makala haya, tutakuonyesha baadhi ya mifano kwa taswira bora ili kutumia VBA DIR kazi. Tumaini utaweza kutumia kazi baada ya kusoma makala. Kwa hivyo, wacha tuanze.
Pakua Kitabu cha Mazoezi
Pakua kitabu cha mazoezi kifuatacho. Itakusaidia kuelewa somo vyema zaidi.
DIR Function.xlsm
Utangulizi wa Kazi ya DIR
Muhtasari:
Kitendaji cha VBA DIR kinarudisha jina la faili au saraka kutoka kwa njia ya folda fulani. Kwa kawaida, hurejesha faili ya kwanza.
Sintaksia:
Dir [ (pathname, [ attributes ] ) ] Maelezo ya Hoja:
| Hoja | Inahitajika/Hiari | Maelezo |
|---|---|---|
| PathName | Hiari | Njia ili kufikia na kubainisha faili |
| Sifa | Hiari | Usemi wa mara kwa mara au wa nambari hubainisha sifa za faili zinazolingana |
Kuna machache kabla yasifa zilizobainishwa, ni-
| Jina la Sifa | Maelezo |
|---|---|
| vbNormal | Faili zisizo na sifa mahususi |
| vbSoma Pekee | Faili za kusoma pekee zisizo na sifa |
| vbZilizofichwa | Zimefichwa faili zisizo na sifa |
| vbSystem | Faili za mfumo zisizo na sifa |
| vbVolume | Lebo ya kiasi 17> |
| vbDirectory | Saraka au folda zisizo na sifa |
| vbAlias | Jina la faili lililobainishwa ni lakabu |
7 Mifano ya Kutumia Kitendaji cha VBA DIR katika Excel
Kutokana na maelezo, huenda umeelewa kuwa VBA DIR kazi hutoa jina la faili kutoka kwa njia iliyotolewa. Hebu tuelewe kwa mfano. Hapa tumeunda saraka Exceldemy_Folder ili kukuonyesha mifano mbalimbali. Kuna folda ndogo na faili tofauti katika folda hii.
1. Tafuta Jina la Faili kutoka Njia
Katika folda yetu, tunaweza kupata faili maalum kwa kutumia kutangaza njia ya jina la faili.
Baada ya kunakili njia ya faili, unahitaji kuendesha msimbo.
Kwa sababu hii, nenda kwa Msanidi kichupo >> chagua Visual Basic . Kisha nenda kwenye Ingiza kichupo >> chagua Moduli. Katika kisanduku cha mazungumzo Jumla , tunaandika msimbo.
Kama ajenda yetu ni kupata >Jina la faili kutoka kwa jina la njia, tutawekajina kamili la njia (kutoka mzizi hadi faili) na msimbo wetu utakuwa
4858
Hapa ndani ya msimbo wetu, tumeweka jina la njia kama E:\Exceldemy\Sales_of_January. xlsx
Uchanganuzi Wa Msimbo:
- Mwanzoni, tulitangaza kigezo cha mfuatano kinachoitwa FN . Na matokeo ya Dir kazi ilihifadhiwa katika kigezo hiki.
- Kifuatacho, Dir kazi hupata jina la faili na kuirejesha kutoka kwa njia iliyotolewa.
- Kisha MsgBox huweka pato kupitia kisanduku cha ujumbe. MsgBox hurejesha towe kwa kutumia kisanduku cha ujumbe.
- Kisha, endesha msimbo kwa F5 ufunguo.
Mwishowe, tumepata faili iliyoitwa Sales_of_January.xlsx .
2. Angalia Kuwepo kwa Saraka
Tunaweza kuangalia kuwepo kwa saraka kwa kutumia Dir kazi. Hebu tuandike msimbo ili kuangalia ikiwa folda ya Exceldemy ipo. Andika msimbo ufuatao katika kisanduku cha jumla na uiendeshe kwa F5 ufunguo.
5377
Uchanganuzi wa Msimbo :
- Tumetangaza vigezo viwili; PN ina jina kamili la saraka yetu ya kukagua.
- Hapa ndani ya Dir kitendaji, tumeweka thamani mbili, jina la njia na sifa. thamani kama vbDirectory . Thamani hii ya sifa itasaidia kugundua saraka. Na matokeo ya kazi hii yamehifadhiwa kwenye faili ya Faili kigeu.
- Kisha tukaangalia kama kigezo ni tupu au la. Ikiwa tunapata kwamba kutofautiana sio, basi tangaza kuwepo kwa saraka kupitia sanduku la ujumbe, vinginevyo, kurudi haipo.
Hapa, Exceldemy saraka ipo, kwa hivyo tutapata “ Exceldemy ipo ”, ambapo Exceldemy ni jina la folda.
3. Unda Folda Ambayo Haipo
Unaweza kuunda folda ambayo haipo kwenye Kompyuta yako. Kwa hili, unapaswa kuunda jina la njia ambalo halipo kwenye folda zako. Hebu fikiria tutaunda saraka iitwayo Exceldemy_1 . Tutatumia MkDir amri kuunda saraka, lakini kabla ya hapo, tunahitaji kuandika nambari ifuatayo VBA .
6211
saraka imeundwa. Wacha tuangalie folda ya saraka. Folda ya Exceldemy_1 sasa inaonekana kwenye kompyuta yako.
Masomo Sawa:
27>4. Tafuta Faili ya Kwanza kutoka kwa Saraka
Kazi kuu ya Dir kazi ni kupata faili ya kwanza kwenye saraka iliyotolewa. Unachohitaji kutoa ndani ya chaguo la kukokotoa ni jina la njia (hadi saraka ya kontena), na itarudisha faili ya kwanza kabisa kutoka kwa saraka hiyo.
Hebu tutafute faili ya kwanza kutoka yetu. Exceldemy saraka. Msimbo wetu utakuwa
8954
Unaweza kuona msimbo wa msingi; tumepitisha jina la njia kwenye Dir kazi. Sasa Endesha msimbo ukitumia kitufe cha F5 , utapata faili ya kwanza kwenye saraka hii.
5. Tafuta Zote Faili kutoka kwa Saraka
Katika sehemu iliyotangulia, tumeona jinsi ya kupata jina la faili la kwanza kutoka kwa saraka. Hali inaweza kutokea wakati unahitaji kupata faili zote kutoka kwa saraka maalum. Ili kupata faili zote katika saraka maalum, unapaswa kuandika VBA msimbo ufuatao.
9772
Hapa kuna vigeu viwili vya kuhifadhi majina ya faili kama moja ( FN ), na kama orodha ( FL ). Kitanzi cha Do While kinarudia hadi hakuna faili iliyobaki kwenye saraka, kwa kutumia kitanzi hiki, tunasukuma kila jina la faili kwenye kigezo cha FL .
Tekeleza msimbo, na utapata faili zote kwenye saraka, kama kwenye picha iliyo hapa chini.
6. Tafuta Faili na Folda Zote kutoka kwa Saraka
Sisiwametaja katika sehemu iliyopita ambapo unaweza kupata faili zote. Tunaweza pia kupata folda ndogo zote kwenye folda. Ili kufanya hivyo, andika msimbo VBA ufuatao ambao tumeambatisha hapa chini.
1670
Mabadiliko katika msimbo wetu ni matumizi ya vigezo vya sifa. Tumetumia vbDirectory katika uwanja huo. Endesha msimbo, na utapata faili na folda zote ndogo za Exceldemy_Folder .
7 Tafuta Faili Zote za Aina Maalum
Kwa kutumia VBA Dir kazi, tunaweza kupata aina yoyote ya faili. Hebu tuchunguze kwa mfano.
Tutapata .csv faili kutoka kwenye saraka yetu. Msimbo wetu utakuwa kama ufuatao-
8146
Tunatumai umeelewa msimbo, unaotumia utaratibu sawa kutafuta faili. Katika jina la njia, tulitumia kadi ya mwitu ( * ). Nyota hii (*) inaashiria kuwa herufi yoyote hadi nambari yoyote inaweza kutokea. Kadi-mwitu imetumika kwa njia ambayo jina la faili linaweza kuwa chochote lakini lazima liwe faili .csv .
Unapoendesha msimbo, itarudisha . csv faili kutoka Exceldemy saraka.
Sehemu ya Mazoezi
Tumetoa mazoezi sehemu kwenye kila karatasi iliyo upande wa kulia kwa mazoezi yako. Tafadhali ifanye peke yako.
Hitimisho
Hayo tu ni kuhusu kipindi cha leo. Na hii ni baadhi ya mifano rahisiya VBA Dir kazi katika Excel. Tafadhali tujulishe katika sehemu ya maoni ikiwa una maswali au mapendekezo. Kwa ufahamu bora, tafadhali pakua karatasi ya mazoezi. Tembelea tovuti yetu, Exceldemy , mtoa huduma wa suluhisho la Excel, ili kujua kuhusu aina mbalimbali za mbinu za Excel. Asante kwa uvumilivu wako katika kusoma makala hii.
