Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Verhindern des Schließens einer UserForm mittels Schließkreuz

Gruppe

UserForm

Problem

Wie kann ich verhindern, daß der Anwender eine UserForm mittels des rechts oben im Dialog angebrachten Schließkreuzes abbrechen kann?

Lösung
Geben Sie den nachfolgenden Code in das Klassenmodul der UserForm ein.

ClassModule: frmClose

Private Sub cmdContinue_Click()
  Unload Me
End Sub

Private Sub UserForm_QueryClose _
    (Cancel As Integer, CloseMode As Integer)
    If CloseMode <> 1 Then Cancel = 1
End Sub

StandardModule: basMain

Sub CallForm()
   frmClose.Show
End Sub