Isi kandungan
Fungsi DIR dalam VBA terutamanya menunjukkan kepada anda direktori atau fail daripada folder tertentu. Ia juga boleh mengembalikan fail pertama dengan fungsi ini. Fungsi ini mempunyai banyak kegunaan untuk mendapatkan fail dan folder tertentu. Apa yang anda perlukan hanya memasukkan laluan fail dalam nama laluan kod VBA . Anda mungkin merasa lebih sukar untuk menggunakan kod VBA DIR . Jangan risau, dalam artikel ini, kami akan menunjukkan kepada anda beberapa contoh untuk visualisasi yang lebih baik untuk menggunakan fungsi VBA DIR . Harap anda akan dapat menggunakan fungsi tersebut selepas membaca artikel tersebut. Jadi, mari kita mulakan.
Muat Turun Buku Kerja Amalan
Muat turun buku kerja latihan berikut. Ia akan membantu anda memahami subjek dengan lebih baik.
Fungsi DIR.xlsm
Pengenalan kepada Fungsi DIR
Ringkasan:
Fungsi VBA DIR mengembalikan nama fail atau direktori daripada laluan folder yang diberikan. Secara konvensional, ia mengembalikan fail pertama.
Sintaks:
Dir [ (pathname, [ attributes ] ) ] Penjelasan Argumen:
| Argumen | Diperlukan/Pilihan | Penjelasan |
|---|---|---|
| PathName | Pilihan | Path untuk mengakses dan menentukan fail |
| Atribut | Pilihan | Ungkapan malar atau angka menentukan atribut fail yang sepadan |
Terdapat beberapa pra-atribut yang ditentukan, ia adalah-
| Nama Atribut | Penerangan |
|---|---|
| vbNormal | Fail tanpa atribut khusus |
| vbReadOnly | Fail baca sahaja tanpa atribut |
| vbHidden | Tersembunyi fail tanpa atribut |
| vbSystem | Fail sistem tanpa atribut |
| vbVolume | Label volum |
| vbDirectory | Direktori atau folder tanpa atribut |
| vbAlias | Nama fail yang ditentukan ialah alias |
7 Contoh Penggunaan Fungsi VBA DIR dalam Excel
Dari penerangan, anda mungkin telah memahami bahawa fungsi VBA DIR menyediakan nama fail daripada nama laluan yang disediakan. Mari kita fahami dengan contoh. Di sini kami telah mencipta direktori Exceldemy_Folder untuk menunjukkan kepada anda pelbagai contoh. Terdapat folder dan fail kecil yang berbeza dalam folder ini.
1. Cari Nama Fail dari Laluan
Dalam folder kami, kami boleh mencari fail tertentu dengan mengisytiharkan laluan nama fail.
Selepas menyalin laluan fail, anda perlu menjalankan kod.
Atas sebab ini, pergi ke tab Pembangun >> pilih Visual Basic . Kemudian pergi ke tab Sisipkan >> pilih Modul. Dalam kotak dialog Umum , kami menulis kod.
Memandangkan agenda kami adalah untuk mencari Nama fail daripada nama laluan, kami akan menetapkannama laluan penuh (dari akar hingga fail) dan kod kami ialah
1698
Di sini dalam kod kami, kami telah menetapkan nama laluan sebagai E:\Exceldemy\Sales_of_January. xlsx
Pecahan Kod:
- Pada mulanya, kami mengisytiharkan pembolehubah rentetan yang dipanggil FN . Dan output fungsi Dir telah disimpan dalam pembolehubah ini.
- Seterusnya, fungsi Dir mencari nama fail dan mengembalikannya daripada laluan yang disediakan.
- Kemudian MsgBox menetapkan output melalui kotak mesej. MsgBox mengembalikan output menggunakan kotak mesej.
- Kemudian, jalankan kod dengan kekunci F5 .
Akhir sekali, kami telah menemui fail bernama Jualan_Januari.xlsx .
2. Semak Kewujudan Direktori
Kita boleh menyemak kewujudan direktori menggunakan fungsi Dir . Mari tulis kod untuk menyemak sama ada folder Exceldemy wujud. Tulis kod berikut dalam kotak umum dan jalankannya dengan kekunci F5 .
8333
Pecahan Kod :
- Kami telah mengisytiharkan dua pembolehubah; PN mengandungi nama laluan penuh direktori semakan kami.
- Di sini dalam fungsi Dir , kami telah menetapkan dua nilai, nama laluan dan atribut nilai sebagai vbDirectory . Nilai atribut ini akan membantu untuk mengesan direktori. Dan output fungsi ini disimpan dalam Fail pembolehubah.
- Kemudian kami menyemak sama ada pembolehubah itu kosong atau tidak. Jika kita mendapati pembolehubah itu tidak, maka isytiharkan kewujudan direktori melalui kotak mesej, jika tidak, pulangan tidak wujud.
Di sini, Exceldemy<21 Direktori> wujud, jadi kami akan menemui " Exceldemy wujud ", dengan Exceldemy ialah nama folder.
3. Cipta Folder Yang Tidak Wujud
Anda boleh mencipta folder yang tidak wujud pada PC anda. Untuk ini, anda perlu mencipta nama laluan yang tidak wujud dalam folder anda. Bayangkan kita akan mencipta direktori yang dipanggil Exceldemy_1 . Kami akan menggunakan perintah MkDir untuk mencipta direktori, tetapi sebelum itu, kami perlu menulis kod VBA berikut.
4115
Di sini kami telah menulis arahan untuk mencipta direktori menggunakan nama laluan daripada blok Else kod kami. Jalankan kod dengan kekunci F5 .
Direktori telah dibuat. Mari lihat folder direktori. Folder Exceldemy_1 kini boleh dilihat pada komputer anda.
Bacaan Serupa:
- Cara Memanggil Sub dalam VBA dalam Excel (4 Contoh)
- Kembalikan Nilai dalam Fungsi VBA (Kedua-dua Nilai Tatasusunan dan Bukan Tatasusunan)
- Gunakan Fungsi VBA UCASE dalam Excel (4 Contoh)
- Cara Menggunakan Fungsi TRIM dalamVBA dalam Excel (Definisi + Kod VBA)
4. Cari Fail Pertama daripada Direktori
Tugas utama fungsi Dir adalah untuk mencari fail pertama dalam direktori yang disediakan. Apa yang anda perlu berikan di dalam fungsi ialah nama laluan (sehingga direktori kontena), dan ia akan mengembalikan fail pertama daripada direktori itu.
Mari cari fail pertama daripada kami Direktori Exceldemy. Kod kami ialah
7688
Anda boleh melihat kod asas; kami telah menghantar nama laluan ke dalam fungsi Dir . Sekarang Jalankan kod dengan kekunci F5 , anda akan menemui fail pertama dalam direktori ini.
5. Cari Semua Fail daripada Direktori
Dalam bahagian sebelumnya, kita telah melihat cara mencari nama fail pertama daripada direktori. Situasi mungkin timbul apabila anda perlu mencari semua fail dari direktori tertentu. Untuk mencari semua fail dalam direktori tertentu, anda perlu menulis kod VBA berikut.
4470
Berikut ialah dua pembolehubah untuk menyimpan nama fail sebagai satu ( FN ), dan sebagai senarai ( FL ). Gelung Do While berulang sehingga tiada fail kekal dalam direktori, menggunakan gelung ini, kami menolak setiap nama fail ke dalam pembolehubah FL .
Laksanakan kod, dan anda akan menemui semua fail dalam direktori, seperti dalam imej di bawah.
6. Cari Semua Fail dan Folder daripada Direktori
Kamitelah disebutkan di bahagian sebelumnya di mana untuk mencari semua fail. Kami juga boleh mencari semua sub-folder dalam folder. Untuk melakukan ini, tulis kod VBA berikut yang telah kami lampirkan di bawah.
1352
Perubahan dalam kod kami hanyalah penggunaan parameter atribut. Kami telah menggunakan vbDirectory dalam medan itu. Jalankan kod dan anda akan menemui semua fail dan subfolder Exceldemy_Folder .
7 Cari Semua Fail Jenis Tertentu
Menggunakan fungsi VBA Dir , kita boleh mencari sebarang jenis fail tertentu. Mari teroka dengan contoh.
Kami akan mencari fail .csv daripada direktori kami. Kod kami akan menjadi seperti berikut-
7493
Kami harap anda telah memahami kod tersebut, yang menggunakan mekanisme serupa untuk mencari fail. Dalam nama laluan, kami menggunakan kad bebas ( * ). Asterisk (*) ini menandakan bahawa sebarang aksara sehingga sebarang nombor boleh berlaku. Kad bebas telah digunakan sedemikian rupa sehingga nama fail boleh menjadi apa-apa sahaja tetapi mestilah fail .csv .
Apabila anda menjalankan kod, ia akan mengembalikan . csv daripada direktori Exceldemy kami.
Bahagian Amalan
Kami telah menyediakan amalan bahagian pada setiap helaian di sebelah kanan untuk latihan anda. Sila lakukan sendiri.
Kesimpulan
Itu sahaja tentang sesi hari ini. Dan ini adalah beberapa contoh mudahdaripada fungsi VBA Dir dalam Excel. Sila beritahu kami di bahagian komen jika anda mempunyai sebarang soalan atau cadangan. Untuk pemahaman yang lebih baik, sila muat turun helaian latihan. Lawati tapak web kami, Exceldemy , penyedia penyelesaian Excel sehenti, untuk mengetahui tentang pelbagai jenis kaedah Excel. Terima kasih atas kesabaran anda membaca artikel ini.
