Excel2010_VBA_Mehrfachimport von Daten_Fehlermeldung

Hallo,


in einer Exceldatei will ich per Makro einen Mehrfachimport von Exceldaten durchführen und dazu Application.GetOpenFilename nutzen.

Leider bekomme ich es nicht hin, den Druck auf "Abbrechen" im Öffnen-Dialog per Makrozeile umzusetzen.

Ohne Mehrfachimport geht es, aber sobald Mehrfachimport gesetzt ist.... Typen unverträglich

Wie kann ich das umsetzen?

Hier der Auszug aus dem Makro:


Sub einlesen()
Dim DVerli As Variant
DVerli = Application.GetOpenFilename("Excel-Dateien(*.xls;*.xlsm;*.xlsx),*.xls;*.xlsm;*.xlsx", 1, "Bitte wählen", False, True)
If DVerli = False Then Exit Sub

'

'Restcode

'

End Sub