W programie Microsoft Excel możemy sprawdzić, czy plik istnieje w określonej lokalizacji za pomocą kodu VBA. Makro wyświetli status w postaci okienka komunikatu. W tym artykule określimy, czy status danego pliku istnieje, czy nie, za pomocą kodu VBA. Możemy użyć funkcji Dir, aby sprawdzić, czy plik istnieje w lokalizacji za pomocą Excel VBA.
Za pomocą tego programu możemy sprawdzić, czy w tej samej lokalizacji istnieje już jakiś plik. Dzięki temu możemy usunąć lub zmienić nazwę starego pliku.
Pytanie: Kiedy tworzymy makro, aby zautomatyzować zadanie, zazwyczaj zapisujemy plik wyjściowy w lokalizacji. Chciałbym mieć makro do weryfikacji i w zamian pokazać, że plik jest dostępny lub nie w określonej ścieżce.
Aby zilustrować ten przykład, zapiszemy plik „Sample.xlsx” w ścieżce „D:\FolderName\Sample.xlsx”
Aby określić, czy skoroszyt istnieje, musimy wykonać poniższe kroki, aby uruchomić edytor VB:
- Kliknij kartę Deweloper
- Z grupy Kod wybierz Visual Basic
- Kliknij Wstaw, a następnie Moduł
- Spowoduje to utworzenie nowego modułu
- Wprowadź następujący kod w module standardowym
Sub FileExists() Dim FilePath As String Dim TestStr As String FilePath = "D:\FolderName\Sample.xlsx" TestStr = "" W przypadku błędu Wznów Dalej TestStr = Dir(FilePath) W przypadku błędu GoTo 0 If TestStr = "" Then MsgBox " Plik nie istnieje" Else Workbooks.Open "D:\FolderName\Sample.xlsx" End If End Sub
- Teraz makro jest gotowe do uruchomienia, użyjemy klawisza skrótu F5 i otworzy się plik „Przykładowy”
- Jeśli plik nie jest dostępny we wstępnie zdefiniowanej ścieżce, pojawi się następujący komunikat:
Wniosek: W ten sposób możemy łatwo rozpoznać, czy dany plik istnieje, czy nie w określonej ścieżce za pomocą kodu VBA.
Jeśli podobały Ci się nasze blogi, podziel się nimi ze znajomymi na Facebooku. A także możesz śledzić nas na Twitterze i Facebooku.
Chcielibyśmy usłyszeć od Ciebie, daj nam znać, jak możemy ulepszyć, uzupełnić lub unowocześnić naszą pracę i uczynić ją lepszą dla Ciebie. Napisz do nas na stronie e-mail