Jak sprawdzić, czy plik lub folder istnieje na twoim komputerze za pomocą Excel VBA?

Dzisiejszy samouczek dotyczący automatyzacji pakietu Office koncentruje się na nauce sprawdzania, czy plik istnieje w jednym z katalogów komputera.

Przygotowanie

Jeśli jesteś trochę nowy w kodowaniu, upewnij się, że karta Programowanie programu Microsoft Office Excel jest włączona i że znasz podstawowe języki VBA programu Excel .

Sprawdzanie, czy plik istnieje w Excel VBA

Poniższy kod wykorzystuje pola wejściowe w celu przechwycenia ścieżki do pliku, a także samej nazwy pliku od użytkownika.

Następnie wykorzystuje metodę Dir , aby sprawdzić, czy ścieżka pliku rzeczywiście istnieje.

Na koniec wyświetla użytkownikowi okno komunikatu z wynikiem sprawdzenia.

Sub Check_file_exists()

Dim NameDir As String
Dim NameFile As String

'Capture the file path and name from the users
NameDir = InputBox("Enter file directory")
NameFile = InputBox("Enter file name")

'Check whether the file exists
If (Dir(NameDir & NameFile)) = "" Then
    MsgBox ("File doesn't exist")

    Else
    
    MsgBox ("File exists")
    End If
End Sub

Sprawdź, czy folder istnieje

W całkiem podobny sposób możesz sprawdzić, czy w Twoim systemie operacyjnym istnieje określony folder. Również tutaj wykorzystujemy metodę Dir , ale z parametrem vbDirectory .

Sub Check_folder_exists()

Dim NameDir As String

NameDir = InputBox("Enter file directory")


If (Dir(NameDir, vbDirectory)) = "" Then
    MsgBox ("Folder doesn't exist")

    Else
    
    MsgBox ("Folder exists")
    End If
End Sub

Korzystanie z kodu

• Otwórz Microsoft Excel i przejdź do swojego skoroszytu.
• Hit Developer, a następnie naciśnij Visual Basic.
• Skopiuj i wklej kod z góry jako podprogram w określonym arkuszu modułu VBA.
• Uruchom (F5) kod.
• Zapisz swój skoroszyt.

Możliwe rozszerzenia

Powyższy kod tabliczki kotła może zostać rozszerzony dla następujących przypadków użycia:

• Utwórz folder / plik, jeśli jeszcze nie istnieje.
• Usuń plik folderu, pod warunkiem, że znajdują się one w katalogu plików systemu operacyjnego.
• Szukaj plików/folderów za pomocą symbolu wieloznacznego.