Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Feststellen, ob eine Datei in einem Verzeichnis existiert

Gruppe

Verzeichnis

Problem

Wie kann ich über VBA feststellen, ob eine bestimmte Datei in einem vorgegebenen Verzeichnis existiert?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub DateiVorhanden()
   Dim sFile As String
   sFile = Range("B1").Value
   If Dir(sFile) <> "" Then
      MsgBox sFile & " ist vorhanden!"
   Else
      MsgBox sFile & " ist nicht vorhanden!"
   End If
End Sub