17.3 Dateien verwalten

Wir kehren nun den Verzeichnissen den Rücken zu. Auf den folgenden Buchseiten erfahren Sie alles über das Arbeiten mit Dateien.

Ermitteln, ob eine Datei existiert

Wenn Sie eine Datei ansprechen wollen, sollten Sie in jedem Fall immer prüfen, ob diese tatsächlich im angegebenen Pfad existiert. Verwenden Sie dazu die Methode Dir.

Sub CheckIfFileExists()
   Const strPath As String = "C:\test\temp.xlsx"

   If Dir(strPath) <> "" Then
      MsgBox "Datei """ & strPath & """ vorhanden."
   Else
      MsgBox "Datei """ & strPath & """ nicht vorhanden."
   End If
End Sub

Dateien löschen

Um eine Datei aus einem Verzeichnis zu löschen, verwenden Sie die Anweisung Kill.

Wichtig: Löschen erfolgt ohne Rückfrage

Vor dem Löschen der Datei erfolgt vom System keine Rückfrage, ...

Get Richtig einsteigen: Excel 2010 VBA-Programmierung now with O’Reilly online learning.

O’Reilly members experience live online training, plus books, videos, and digital content from 200+ publishers.