Herbers Excel-Forum - das Archiv

Ereignis Schliessen einer UserForm

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Ereignis Schliessen einer UserForm
von: Marco
Geschrieben am: 14.10.2003 11:33:49
Hallo Leute,

ich möchte bitte wissen, wie man das Ereignis "Klick auf das x" rechts oben
in einer UserForm reagiert ! Das Schließen eines Modalen und zwingenden Dialoges möchte ich nämlich vermeiden !

1.) Ich will entweder den klick auf das x zum Fenster schließen abfangen oder
2. ) das Fenster ganz ohne x darstellen und dem User damit die Möglichkeit nehmen das Fenster schließen zu können !

Merci bereits vorweg !
Gruß
Marco

Bild

Betrifft: AW: Ereignis Schliessen einer UserForm
von: Hajo_Zi
Geschrieben am: 14.10.2003 11:35:56
allo
arco



Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
'   Damit mit X nicht geschloßen werden kann
If CloseMode = 0 Then
MsgBox "Bitte schließen Sie die Anwendung mit der -Ende- Schaltfläche.", vbCritical
Cancel = 1
End If
End Sub



Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

http://home.media-n.de/ziplies/

Bild

Betrifft: AW: Ereignis Schliessen einer UserForm
von: Hajo_Zi
Geschrieben am: 14.10.2003 12:28:23
Hallo Marco

da sind wohl paar Buchstaben verloren gegangen. Endschuldigung.


Microsoft MVP für Excel


http://home.media-n.de/ziplies/

 Bild
Excel-Beispiele zum Thema " Ereignis Schliessen einer UserForm"
Die Ereignisse Zellauswahl, Eingabe und Doppelklick SVERWEIS als Ereignisprozedur
Im Change-Ereignis Eingabe in oder Leeren von Zellen erkennen Makroverzweigung im Change-Ereignis
ComboBox mit Ereigniscode in Tabellenblatt erstellen DoubleClick-Ereignis für alle Arbeitsmappen initialisieren
Begrenzung der Textlänge über Ereignis-Programmierung Beispiele zum Einsatz des SelectionChange-Ereignisses
Passwortgeschützte Mappe öffnen, Daten kopieren, schliessen Arbeitsmappe schliessen, wenn kein Eintrag in TextBox erfolgt