Bagaimana cara memeriksa apakah file ada di folder tertentu?
Misalkan, Anda memiliki folder yang berisi banyak file, dan sekarang, Anda ingin mengidentifikasi apakah file tertentu ada di folder ini dari Excel. Artikel ini, saya akan memperkenalkan metode cepat bagi Anda untuk memeriksa apakah ada file di folder tertentu secara detail melalui Excel.
Periksa apakah file ada di folder tertentu dengan kode VBA
Periksa apakah file ada di folder tertentu dengan kode VBA
Untuk memeriksa apakah file ada di folder tertentu atau tidak di lembar kerja Excel, Anda dapat menerapkan kode VBA berikut, lakukan seperti ini:
1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.
2. Klik Menyisipkan > Modul, dan tempel kode berikut di Module Window.
Kode VBA: Periksa apakah file ada di folder tertentu:
Sub Test_File_Exist_With_Dir()
'Updateby Extendoffice
Application.ScreenUpdating = False
Dim FilePath As String
FilePath = ""
On Error Resume Next
FilePath = Dir("C:\Users\DT168\Desktop\Test folder\Book2.xlsx")
On Error GoTo 0
If FilePath = "" Then
MsgBox "File doesn't exist", vbInformation, "Kutools for Excel"
Else
MsgBox "File exist", vbInformation, "Kutools for Excel"
End If
Application.ScreenUpdating = False
End Sub
Catatan: Pada kode di atas, Anda harus mengubah jalur dan nama file C: \ Users \ DT168 \ Desktop \ Test folder \ Book2.xlsx " untuk kebutuhan anda.
3. Setelah menempelkan kode, silakan tekan F5 kunci untuk menjalankan kode ini:
(1.) Jika file tersebut ada, Anda akan mendapatkan screenshot berikut:
(2.) Jika file tidak ada, Anda akan mendapatkan peringatan berikut:
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!