Efnisyfirlit
DIR aðgerðin í VBA sýnir þér aðallega möppuna eða skrárnar úr tiltekinni möppu. Það getur líka skilað fyrstu skránni með þessari aðgerð. Þessi aðgerð hefur fullt af notum til að fá sérstakar skrár og möppur. Allt sem þú þarft til að setja inn skráarslóðina í slóðina á VBA kóðanum. Þú gætir fundið það erfiðara að nota VBA DIR kóðana. Ekki hafa áhyggjur, í þessari grein ætlum við að sýna þér nokkur dæmi fyrir betri sjónmynd til að nota VBA DIR aðgerðina. Vona að þú getir notað aðgerðina eftir að þú hefur lesið greinina. Svo, við skulum byrja.
Sækja æfingarvinnubók
Hlaða niður eftirfarandi æfingu vinnubók. Það mun hjálpa þér að skilja efnið betur.
DIR Function.xlsm
Inngangur að DIR fallinu
Samantekt:
VBA DIR fallið skilar nafni skráar eða möppu úr tiltekinni möppuslóð. Venjulega skilar það fyrstu skránni.
Syntax:
Dir [ (pathname, [ attributes ] ) ]
Rökskýring:
Rök | Áskilið/valfrjálst | Skýring |
---|---|---|
PathName | Valfrjálst | Slóð til að fá aðgang að og tilgreina skrána |
Eiginleikar | Valfrjálst | Stöðug eða töluleg tjáning tilgreinir eiginleika samsvarandi skráa |
Það eru nokkrar for-skilgreindir eiginleikar, þeir eru-
Eigindaheiti | Lýsing |
---|---|
vbNormal | Skráar án sérstakra eiginleika |
vbReadOnly | Skrifavarðar skrár án eiginleika |
vbHidden | Falinn skrár án eiginleika |
vbSystem | Kerfisskrár án eiginleika |
vbVolume | Volume label |
vbDirectory | Möppur eða möppur án eiginleika |
vbAlias | Tilgreint skráarnafn er samnefni |
7 Dæmi um notkun VBA DIR aðgerðarinnar í Excel
Af lýsingunni gætirðu hafa skilið að VBA DIR aðgerðin veitir skráarheiti frá uppgefnu slóðheiti. Við skulum skilja það með fordæmi. Hér höfum við búið til möppu Exceldemy_Folder til að sýna þér ýmis dæmi. Það eru mismunandi litlar möppur og skrár í þessari möppu.
1. Finndu skráarnafnið úr slóð
Í möppunni okkar getum við fundið tiltekna skrá með því að lýsa yfir slóð skráarnafnsins.
Eftir að hafa afritað slóð skrárinnar þarftu að keyra kóðann.
Af þessum sökum skaltu fara á Hönnuði flipann >> veldu Visual Basic . Farðu síðan í flipann Insert >> veldu Module. Í General valmyndinni skrifum við kóðann.
Þar sem dagskráin okkar er að finna Skráarnafn frá slóðinni, munum við stillafullt slóðanafn (frá rótinni að skránni) og kóðinn okkar verður
8620
Hér í kóðanum okkar höfum við stillt slóðanafnið sem E:\Exceldemy\Sales_of_January. xlsx
Kóðasundurliðun:
- Upphaflega lýstum við yfir strengjabreytu sem heitir FN . Og úttak Dir fallsins var vistað í þessari breytu.
- Næst, Dir finnur skráarnafnið og skilar því frá uppgefinni slóð.
- Þá setur MsgBox úttakið í gegnum skilaboðareitinn. MsgBox skilar úttak með því að nota skilaboðareit.
- Síðan skaltu keyra kóðann með F5 lyklinum.
Loksins höfum við fundið skrána sem heitir Sales_of_January.xlsx .
2. Athugaðu hvort skráasafn sé til <3 24>
Við getum athugað hvort möppu sé til með því að nota Dir aðgerðina. Skrifum kóðann til að athuga hvort Exceldemy mappan sé til. Skrifaðu niður eftirfarandi kóða í almenna reitinn og keyrðu hann með F5 lyklinum.
4348
Kóðasundurliðun :
- Við höfum lýst yfir tveimur breytum; PN inniheldur fullt slóðanafn eftirlitsskrárinnar okkar.
- Hér í Dir aðgerðinni höfum við stillt tvö gildi, pathname og eigindina gildi sem vbDirectory . Þetta eigindargildi mun hjálpa til við að greina möppuna. Og framleiðsla þessarar aðgerðar er geymd í Skrá breyta.
- Svo athuguðum við hvort breytan sé tóm eða ekki. Ef við komumst að því að breytan er það ekki, þá lýsum yfir tilvist möppunnar í gegnum skilaboðareit, annars er skilin ekki til.
Hér er Exceldemy skráin er til, svo við finnum " Exceldemy er til ", þar sem Exceldemy er nafn möppunnar.
3. Búðu til möppu sem er ekki til
Þú getur búið til möppu sem er ekki til á tölvunni þinni. Til þess þarftu að búa til slóð sem er ekki til í möppunum þínum. Ímyndum okkur að við ætlum að búa til möppu sem heitir Exceldemy_1 . Við munum nota MkDir skipunina til að búa til möppuna, en áður en það gerist þurfum við að skrifa eftirfarandi VBA kóða.
8176
Hér höfum við skrifað skipun til að búa til möppuna með því að nota slóðanafnið úr Annað kubbnum í kóðanum okkar. Keyrðu kóðann með F5 lyklinum.
Mappasafnið hefur verið búið til. Við skulum líta á möppuna. Exceldemy_1 möppan er nú sýnileg á tölvunni þinni.
Svipuð lesning:
- Hvernig á að hringja í undirmann í VBA í Excel (4 dæmi)
- Skilaðu gildi í VBA aðgerð (bæði fylkisgildi og ekki fylkisgildi)
- Notaðu VBA UCASE aðgerð í Excel (4 dæmi)
- Hvernig á að nota TRIM aðgerð íVBA í Excel (skilgreining + VBA kóða)
4. Finndu fyrstu skrána úr möppu
Aðal verkefni Dir er til að finna fyrstu skrána í tilgreindri möppu. Allt sem þú þarft að gefa upp inni í aðgerðinni er slóðanafnið (upp að gámaskránni) og það mun skila fyrstu skránni úr þeirri möppu.
Við skulum finna fyrstu skrána úr okkar Exceldemy skrá. Kóðinn okkar verður
9013
Þú getur séð grunnkóðann; við höfum sent slóðina í Dir fallið. Nú Keyddu kóðann með F5 lyklinum, þú munt finna fyrstu skrána í þessari möppu.
5. Finndu allt Skrár úr möppu
Í fyrri hlutanum höfum við séð hvernig á að finna fyrsta skráarnafnið úr möppu. Sú staða getur komið upp þegar þú þarft að finna allar skrárnar úr tiltekinni möppu. Til að finna allar skrárnar í tiltekinni möppu þarftu að skrifa eftirfarandi VBA kóða.
7545
Hér eru tvær breytur til að geyma skráarnöfnin sem einn ( FN ), og sem listi ( FL ). Do While lykkjan endurtekur allt að engin skrá er eftir í möppunni, með því að nota þessa lykkju, ýtum við hverju skráarnafni inn í FL breytuna.
Keyta kóðann, og þú munt finna allar skrárnar í möppunni, eins og á myndinni hér að neðan.
6. Finndu allar skrár og möppur úr möppu
Viðhafa nefnt í fyrri hlutanum hvar á að finna allar skrárnar. Við getum líka fundið allar undirmöppur í möppu. Til að gera þetta skaltu skrifa eftirfarandi VBA kóða sem við höfum hengt við hér að neðan.
9911
Breytingin á kóðanum okkar er bara notkun eigindabreyta. Við höfum notað vbDirectory á því sviði. Keyddu kóðann og þú munt finna allar skrár og undirmöppur Exceldemy_Folder .
7 Finndu allar skrár af tiltekinni gerð
Með því að nota VBA Dir aðgerðina getum við fundið hvaða tiltekna tegund af skrá sem er. Við skulum kanna með dæmi.
Við ætlum að finna .csv skrár úr skránni okkar. Kóðinn okkar mun vera eins og eftirfarandi-
7980
Við vonum að þú hafir skilið kóðann, sem notar svipaða aðferð til að finna skrár. Í slóðnafninu notuðum við algildisstaf ( * ). Þessi stjörnu (*) gefur til kynna að allir stafir upp að hvaða tölu sem er geta komið fyrir. Jokertáknið hefur verið notað á þann hátt að skráarnafnið getur verið hvað sem er en verður að vera .csv skrá.
Þegar þú keyrir kóðann mun hann skila . csv skrár úr Exceldemy skránni okkar.
Æfingahluti
Við höfum veitt æfingu kafla á hverju blaði hægra megin til að æfa þig. Vinsamlegast gerðu það sjálfur.
Niðurstaða
Þetta snýst allt um lotuna í dag. Og þetta eru nokkur auðveld dæmiaf VBA Dir aðgerðinni í Excel. Vinsamlegast láttu okkur vita í athugasemdahlutanum ef þú hefur einhverjar spurningar eða ábendingar. Til að fá betri skilning skaltu hlaða niður æfingablaðinu. Heimsæktu vefsíðuna okkar, Exceldemy , einn stöðva Excel lausnaveitu, til að fá upplýsingar um fjölbreyttar tegundir af Excel aðferðum. Takk fyrir þolinmæðina við að lesa þessa grein.