Feststellen ob eine Datei vorhanden ist
Folgende Funktion kann dazu genutzt werden um festzustellen, ob eine bestimmte Datei vorhanden ist oder nicht:
Public Function FileExists(strFile As String) As Boolean
FileExists = (Len(Dir(strFile)) > 0)
End Function
Die Funktion FileExists kann nun wie folgt benutzt werden:
FileExists(Pfad\Dateiname.xxx)