Cum să verificați dacă există un fișier într-un anumit folder?

Dacă aveți un folder cu mai multe fișiere și trebuie să determinați dacă există un anumit fișier, Excel vă poate ajuta să automatizați această sarcină. Acest articol oferă o metodă VBA simplă pentru a verifica dacă un fișier există într-un folder dat.

Verificați dacă există un fișier într-un anumit folder cu cod VBA

Verificați dacă există un fișier într-un anumit folder cu cod VBA

Pentru a verifica dacă există un fișier într-un anumit folder sau nu în foaia de lucru Excel, puteți aplica următorul cod VBA, vă rugăm să procedați astfel:

1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. Clic Insera > Moduleși lipiți următorul cod în fereastra modulului.

Cod VBA: verificați dacă există un fișier într-un anumit folder:

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 exists", vbInformation, "Kutools for Excel"
    End If
    Application.ScreenUpdating = False
End Sub

Notă: În codul de mai sus, ar trebui să schimbați calea și numele fișierului C: \ Users \ DT168 \ Desktop \ Test folder \ Book2.xlsx " la nevoia ta.

3. După lipirea codului, vă rugăm să apăsați F5 cheie pentru a rula acest cod:

(1.) Dacă fișierul există, veți obține următoarea captură de ecran:

(2.) Dacă fișierul nu există, veți primi următorul avertisment: