Błąd wykonania 76

Błąd wykonania 76 – Path not found

Błąd ten pojawia się w sytuacji, gdy następuje odwołanie do ścieżki na  dysku, która nie istnieje.
Najlepszym zabezpieczeniem kodu przed tym błędem jest tu po prostu wcześniejsze sprawdzenie, czy ścieżka istnieje.
Przykładowy kod może wyglądać tak:

Public Function CzyKatalog(Jaki_Adres as string)
If Dir(Jaki_Adres, vbDirectory) = “”  Then  
   CzyKatalog=False
 Else
  CzyKatalog=True
End If`
End Sub

Inne błędy wykonania VBA (Run-time) są tu:
Błędy wykonania VBA

 

 

Błąd wykonania 52

Run-time Error 52
Bad file name or number

Błąd wykonania 52 – błędna nazwa pliku

Błąd ten pojawia się w sytuacji, gdy występuje błędna nazwa pliku, do którego się odwołujemy. Nie chodzi tu o przypadek, gdy pliku nie ma (to wywołuje błąd wykonania 53), ale o sytuację, gdy w nazwie pliku występuje któryś z niedozwolonych znaków m.in. !, \, “”, >, <, %, #, ?, *,:,%.

 

 

Błąd wykonania 75

Błąd wykonania 75 – Path/File access error

Błąd ten pojawia się w sytuacji, gdy następuje odwołanie do pliku lub folderu, który nie istnieje. Wystąpi także przy próbie utworzenia folderu, który już jest zapisany.
Najlepszym zabezpieczeniem kodu jest tu po prostu wcześniejsze sprawdzenie, czy dany plik/folder istnieje.
Przykładowy kod może wyglądać tak:

Public Sub NowyKatalog()
If Dir(“C:\ABCD”, vbDirectory) = “” Then   ‘(1)
   MkDir (“C:\ABCD”)   ‘(2)
End If`  ‘(3)
End Sub

W linii (1) następuje sprawdzenie, czy istnieje katalog. Jeżeli nie – następuje przejście do linii (2), jeżeli tak – do (3).

Inne błędy wykonania VBA (Run-time) są tu:
Błędy wykonania VBA