Sie möchten verhindern,
dass eine Userform über den Schließen-Button geschlossen
wird ?
Fügen Sie folgenden Code zur Userform hinzu:
Private Sub UserForm_QueryClose(Cancel As Integer, _
CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
MsgBox "So nicht !"
Cancel = True
End If
End Sub
|
