Abbruch von Excel-Dialog verhindern

Ein selbst programmiertes VBA-Makro ruft den Standarddialog von Excel auf, damit der Benutzer eine Datei zum Öffnen auswählt. Er soll aber nicht die Möglichkeit haben, diesen Dialog durch einen Klick auf die Abbrechen-Schaltfläche zu beenden, sondern auf jeden Fall eine Datei wählen. Wie schalte ich diesen Button ab?

Das lässt sich einfach realisieren, indem Sie den Rückgabewert der Show-Methode auswerten. Falls Sie False zurückliefert, hat der Benutzer den Dialog abgebrochen, andernfalls eine Datei ausgewählt, wie das folgende Beispiel zeigt

Sub Test()
Dim Erg As Boolean
  Do
    Erg = _
      Application.Dialogs(xlDialogOpen).Show
    If Erg = False Then _
      MsgBox "Bitte Datei auswählen!"
  Loop Until Erg = True
End Sub 

Das Beispiel gibt eine Fehlermeldung aus, falls der Benutzer den Dialog abgebrochen hat. (db) ()