Überprüfen, ob Mappe1 existiert
Peter
Aus einem externen Programm exportiere ich Daten in eine Excel-Mappe. Diese heisst "Mappe1" (ohne .xls, da noch nicht gespeichert -
?activeworkbook.name
Mappe1
Nun öffne ich ein anderes Excel-File und importiere diese Daten in eine bestimmte Tabelle. Vor der Ausführung dieser Datenübernahme möchte ich prüfen, ob die noch nicht gespeicherte Mappe1 vorhanden ist.
Mit dem Aufruf von
If FileExists(Dateiname) = True Then
klappt das nicht, weil diese Funktion wohl auch einen Pfad erwartet, den es hier noch nicht gibt.
Public Function FileExists(ByVal strFile As String) As Boolean
On Error Resume Next
FileExists = IIf(Dir(strFile) "", True, False)
End Function
Danke für eine Antwort und Gruss, Peter
Anzeige