Sut i Ddefnyddio Swyddogaeth VBA DIR yn Excel (7 Enghraifft Ymarferol)

  • Rhannu Hwn
Hugh West

Mae'r swyddogaeth DIR yn VBA yn bennaf yn dangos y cyfeiriadur neu'r ffeiliau o ffolder penodol i chi. Gall hefyd ddychwelyd y ffeil gyntaf gyda'r swyddogaeth hon. Mae gan y swyddogaeth hon lawer o ddefnyddiau i gael ffeiliau a ffolderi penodol. Y cyfan sydd ei angen arnoch i fewnosod y llwybr ffeil yn enw llwybr y cod VBA . Efallai y bydd yn anos i chi ddefnyddio'r codau VBA DIR . Peidiwch â phoeni, yn yr erthygl hon, rydyn ni'n mynd i ddangos rhai enghreifftiau i chi ar gyfer delweddu gwell i ddefnyddio'r swyddogaeth VBA DIR . Gobeithio y byddwch chi'n gallu defnyddio'r swyddogaeth ar ôl darllen yr erthygl. Felly, gadewch i ni ddechrau arni.

Lawrlwythwch Gweithlyfr Ymarfer

Lawrlwythwch y llyfr gwaith ymarfer canlynol. Bydd yn eich helpu i ddeall y pwnc yn well.

DIR Function.xlsm

Cyflwyniad i Swyddogaeth DIR

Crynodeb:

Mae'r ffwythiant VBA DIR yn dychwelyd enw ffeil neu gyfeiriadur o lwybr ffolder penodol. Yn gonfensiynol, mae'n dychwelyd y ffeil gyntaf.

Cystrawen:

Dir [ (pathname, [ attributes ] ) ]

Dadleuon Eglurhad:

Dadl Angenrheidiol/Dewisol Esboniad
PathName Dewisol Llwybr i gyrchu ac yn pennu'r ffeil
Priodoleddau Dewisol Mynegiad cyson neu rifol yn pennu priodweddau ffeiliau sy'n cyfateb

Mae yna ychydig o rag-priodoleddau diffiniedig, maent yn-

> vbReadOnly vbVolume
Enw Priodwedd Disgrifiad
vbNormal Ffeiliau heb unrhyw nodweddion penodol
Ffeiliau darllen yn unig heb unrhyw briodweddau
vbCudd Cudd ffeiliau heb unrhyw briodweddau
vbSystem Ffeiliau system heb unrhyw briodweddau
Label cyfrol
vbCyfeiriadur Cyfeiriaduron neu ffolderi heb unrhyw briodweddau
vbAlias Alias ​​yw enw ffeil penodedig<17

7 Enghreifftiau o Ddefnyddio Swyddogaeth VBA DIR yn Excel

O'r disgrifiad, efallai eich bod wedi deall bod ffwythiant VBA DIR yn darparu'r enw ffeil o'r enw llwybr a ddarparwyd. Gadewch i ni ei ddeall trwy esiampl. Yma rydym wedi creu cyfeiriadur Exceldemy_Folder i ddangos enghreifftiau amrywiol i chi. Mae yna wahanol ffolderi bach a ffeiliau yn y ffolder yma.

1. Dewch o hyd i'r Enw Ffeil o'r Llwybr

Yn ein ffolder, gallwn ddod o hyd i ffeil benodol erbyn yn datgan enw'r ffeil llwybr.

Ar ôl copïo llwybr y ffeil, mae angen rhedeg y cod.

Am y rheswm hwn, ewch i'r tab Datblygwr >> dewis Visual Basic . Yna ewch i Mewnosod tab >> dewiswch Modiwl. Yn y blwch deialog Cyffredinol , rydym yn ysgrifennu'r cod> Enw ffeil o'r enw llwybr, byddwn yn gosod yenw llwybr llawn (o'r gwraidd iawn i'r ffeil) a'n cod fydd

4736

Yma o fewn ein cod, rydym wedi gosod yr enw llwybr fel E: \Exceldemy\Sales_of_January. xlsx

Côd Dadansoddiad:

  • I ddechrau, fe wnaethom ddatgan newidyn llinynnol o'r enw FN . A chafodd allbwn y ffwythiant Dir ei gadw yn y newidyn hwn.
  • Nesaf, mae ffwythiant Dir yn dod o hyd i enw'r ffeil ac yn ei ddychwelyd o'r llwybr a ddarparwyd.<29
  • Yna mae'r MsgBox yn gosod yr allbwn drwy'r blwch neges. Mae'r MsgBox yn dychwelyd allbwn gan ddefnyddio blwch neges.
  • Yna, rhedwch y cod gyda'r allwedd F5 .
0>

Yn olaf, rydym wedi dod o hyd i'r ffeil o'r enw Sales_of_January.xlsx .

2. Gwiriwch Bodolaeth Cyfeiriadur

Gallwn wirio bodolaeth cyfeiriadur gan ddefnyddio'r ffwythiant Dir . Gadewch i ni ysgrifennu'r cod i wirio a yw'r ffolder Exceldemy yn bodoli. Ysgrifennwch y cod canlynol yn y blwch cyffredinol a'i redeg gyda'r allwedd F5 .

3819

Dadansoddiad Cod :

  • Rydym wedi datgan dau newidyn; Mae PN yn cynnwys enw llwybr llawn ein cyfeiriadur gwirio.
  • Yma o fewn y ffwythiant Dir , rydym wedi gosod dau werth, y llwybrenw a'r briodwedd gwerth fel vbDirectory . Bydd y gwerth priodoledd hwn yn helpu i ganfod y cyfeiriadur. Ac mae allbwn y swyddogaeth hon yn cael ei storio yn y Ffeil newidyn.
  • Yna fe wnaethom wirio a yw'r newidyn yn wag ai peidio. Os canfyddwn nad yw'r newidyn, yna datganwch fodolaeth y cyfeiriadur trwy flwch neges, fel arall, nid yw'r dychweliad yn bodoli.

Yma, y ​​ Exceldemy<21 Mae cyfeiriadur yn bodoli, felly byddwn yn canfod “ Exceldemy exists ”, lle Exceldemy yw enw'r ffolder.

3. Creu Plygell Na Sy'n Bodoli

Gallwch greu ffolder nad yw'n bodoli ar eich cyfrifiadur. Ar gyfer hyn, mae'n rhaid i chi greu enw llwybr nad yw'n bodoli yn eich ffolderi. Gadewch i ni ddychmygu ein bod yn mynd i greu cyfeiriadur o'r enw Exceldemy_1 . Byddwn yn defnyddio'r gorchymyn MkDir i greu'r cyfeiriadur, ond cyn hynny, mae angen i ni ysgrifennu'r cod VBA canlynol.

7801

0>Yma rydym wedi ysgrifennu gorchymyn i greu'r cyfeiriadur gan ddefnyddio'r llwybrenw o'r bloc Arallo'n cod. Rhedwchy cod gyda'r allwedd F5.

Mae'r cyfeiriadur wedi'i greu. Edrychwn ar y ffolder cyfeiriadur. Mae'r ffolder Exceldemy_1 bellach i'w weld ar eich cyfrifiadur.

Darlleniadau Tebyg:

27>
  • Sut i Alw Is yn VBA yn Excel (4 Enghraifft)
  • Dychwelyd Gwerth mewn Swyddogaeth VBA (Gwerthoedd Arae a Di-Arae)<2
  • Defnyddio Swyddogaeth VBA UCASE yn Excel (4 Enghraifft)
  • Sut i Ddefnyddio Swyddogaeth TRIM ynVBA yn Excel (Diffiniad + Cod VBA)
  • 4. Dod o hyd i'r Ffeil Gyntaf o Gyfeiriadur

    Prif dasg y ffwythiant Dir yw i ddod o hyd i'r ffeil gyntaf yn y cyfeiriadur a ddarperir. Y cyfan sydd angen i chi ei ddarparu y tu mewn i'r swyddogaeth yw'r llwybrenw (hyd at y cyfeiriadur cynhwysydd), a bydd yn dychwelyd y ffeil gyntaf un o'r cyfeiriadur hwnnw.

    Dewch i ni ddod o hyd i'r ffeil gyntaf o'n Exceldemy cyfeiriadur. Ein cod fydd

    7511

    Gallwch weld y cod sylfaenol; rydym wedi trosglwyddo'r llwybrenw i'r swyddogaeth Dir . Nawr Rhedwch y cod gyda'r allwedd F5 , fe welwch y ffeil gyntaf yn y cyfeiriadur hwn.

    5. Dod o Hyd i Bawb Ffeiliau o Gyfeirlyfr

    Yn yr adran flaenorol, rydym wedi gweld sut i ddod o hyd i enw'r ffeil gyntaf o gyfeiriadur. Gall y sefyllfa godi pan fydd angen i chi ddod o hyd i'r holl ffeiliau o gyfeiriadur penodol. I ddod o hyd i'r holl ffeiliau mewn cyfeiriadur penodol, mae'n rhaid i chi ysgrifennu'r cod VBA canlynol.

    5350

    Dyma ddau newidyn i storio'r enwau ffeil fel sengl ( FN ), ac fel rhestr ( FL ). Mae'r ddolen Gwneud Tra bod yn ailadrodd hyd at ddim ffeil yn aros yn y cyfeiriadur, gan ddefnyddio'r ddolen hon, rydym yn gwthio pob enw ffeil i mewn i'r newidyn FL .

    Gweithredwch y cod, a byddwch yn dod o hyd i'r holl ffeiliau yn y cyfeiriadur, fel yn y llun isod.

    6. Dewch o hyd i'r Holl Ffeiliau a Ffolderi o Gyfeiriadur

    Rydymwedi crybwyll yn yr adran flaenorol ble i ddod o hyd i'r holl ffeiliau. Gallwn hefyd ddod o hyd i'r holl is-ffolderi mewn ffolder. I wneud hyn, ysgrifennwch y cod VBA canlynol yr ydym wedi'i atodi isod.

    2784

    Dim ond y defnydd o baramedrau priodoledd yw'r newid yn ein cod. Rydym wedi defnyddio'r vbDirectory yn y maes hwnnw. Rhedwch y cod, a byddwch yn dod o hyd i holl ffeiliau ac is-ffolderi Exceldemy_Folder .

    7 Dod o hyd i'r Holl Ffeiliau o Fath Penodol

    Gan ddefnyddio'r swyddogaeth VBA Dir , gallwn ddod o hyd i unrhyw fath arbennig o ffeil. Gadewch i ni archwilio gydag enghraifft.

    Rydym yn mynd i ddod o hyd i .csv ffeiliau o'n cyfeiriadur. Bydd ein cod fel y canlynol-

    5498

    Gobeithiwn eich bod wedi deall y cod, sy'n defnyddio mecanwaith tebyg ar gyfer dod o hyd i ffeiliau. Yn yr enw llwybr, fe wnaethon ni ddefnyddio cerdyn gwyllt ( * ). Mae'r seren hon (*) yn dynodi y gall unrhyw nod hyd at unrhyw rif ddigwydd. Mae'r cerdyn chwilio wedi'i ddefnyddio yn y fath fodd fel bod enw'r ffeil yn gallu bod yn unrhyw beth ond rhaid iddo fod yn ffeil .csv .

    Pan fyddwch chi'n rhedeg y cod, bydd yn dychwelyd y . csv o'n cyfeiriadur Exceldemy .

    Adran Practis

    Rydym wedi darparu practis adran ar bob tudalen ar yr ochr dde ar gyfer eich ymarfer. Gwnewch hynny ar eich pen eich hun os gwelwch yn dda.

    Casgliad

    Dyna’r cyfan am sesiwn heddiw. A dyma rai enghreifftiau hawddo'r swyddogaeth VBA Dir yn Excel. Rhowch wybod i ni yn yr adran sylwadau os oes gennych unrhyw gwestiynau neu awgrymiadau. I gael gwell dealltwriaeth, lawrlwythwch y daflen ymarfer. Ewch i'n gwefan, Exceldemy , darparwr datrysiadau Excel un-stop, i gael gwybod am fathau amrywiol o ddulliau Excel. Diolch am eich amynedd wrth ddarllen yr erthygl hon.

    Mae Hugh West yn hyfforddwr a dadansoddwr Excel hynod brofiadol gyda dros 10 mlynedd o brofiad yn y diwydiant. Mae ganddo radd Baglor mewn Cyfrifeg a Chyllid a gradd Meistr mewn Gweinyddu Busnes. Mae gan Hugh angerdd am addysgu ac mae wedi datblygu dull addysgu unigryw sy’n hawdd ei ddilyn a’i ddeall. Mae ei wybodaeth arbenigol o Excel wedi helpu miloedd o fyfyrwyr a gweithwyr proffesiynol ledled y byd i wella eu sgiliau a rhagori yn eu gyrfaoedd. Trwy ei flog, mae Hugh yn rhannu ei wybodaeth gyda’r byd, gan gynnig tiwtorialau Excel am ddim a hyfforddiant ar-lein i helpu unigolion a busnesau i gyrraedd eu llawn botensial.