Datei mittels VBA löschen bringt Laufzeitfehler
20.10.2004 09:35:21
Oliver
habe da ein kleines Problem, dass ich mir nicht erklären kann.
Beim Öffnen einer Excel-Datei soll automatisch geprüft werden, ob in dem Ordner (variabel), wo sich diese Datei befindet sich eine bestimmte Datei befindet.Wenn ja, soll diese ohne Sicherheitsabfrage gelöscht werden. Zu diesem Zweck habe ich folgenden Code genommen:
Private Sub loeschen()
Dim finden As String
finden = Dir(ThisWorkbook.Path & "\test" & ".exe")
If finden <> "" Then
Kill finden
End If
End Sub
Beim Ausführen bekomme ich aber Laufzeitfehler 53...warum? Erst findet er sie (if-Abfrage), aber wenn er sie löschen will, dann gibt es sie nicht? Das verstehe ich nicht. Hat wer eine Idee?
Gruß
Oliver