Thema
GetOpenFilename-Methode aufrufen und Form modal belassen
Gruppe
UserForm
Problem
Wenn aus einer UserForm heraus die GetOpenFilename-Methode aufgerufen wird, bleibt die UserForm nicht modal und ein Tabellenblatt kann ausgewählt werden. Es handelt sich um einen Bug. Dieses Beispiel stellt einen WorkAround dar.
ClassModule: frmMode
Private Sub cmdCancel_Click()
Unload Me
End Sub
Private Sub cmdSelect_Click()
Dim vFile As Variant
frmMode.Hide
vFile = Application.GetOpenFilename
frmMode.Show
End Sub
StandardModule: Modul1
Sub CallForm()
frmMode.Show
End Sub