ich möchte beim öffnen einer Tabelle die Fehlermeldung abfangen, sollte die zu öffnende Datei nicht vorhanden sein. Habe folgenden Code (Beispiel), der aber nicht funzt. Er zeigt sofort die MsgBox an, obwohl alle Daten zum Pfad stimmen.
Sub Makro1()
Dim sFile$
sFile = "C:\" & Range("A1").Value & ("\") & Range("A2").Value
If Dir(sFile) = "" Then
MsgBox "Tabelle nicht gefunden!"
Exit Sub
Else
Workbooks.Open Filename:=sFile
End If
End Sub
Kann mir da bitte einer helfen.
Gruß
Stefan