HERBERS Excel-Forum - das Archiv
Bewerten Sie hier bitte das Excel-Portal
Schließkreuz UF umbiegen?
Ralf

Hallo zusammen,
ich möchte in einer Userform die Funktion des Schließkreuzes erhalten aber so umbiegen,
dass Eingaben bis zum nächsten Öffnen der Userform trotzdem erhalten bleiben, also
so, als wenn diese mittels hide ausgeblendet wird.
Wie geht das?
Danke schon mal und frohes Fest!
Ralf

AW: Schließkreuz UF umbiegen?
Hajo_Zi

Halo Ralf,
mache kein Unload, dann bleiben die Eingaben in der Sitzung erhalten. Falls Du Sie bei Activate nicht veränderst.

AW: Schließkreuz UF umbiegen?
Ralf

Hallo Hajo,
schon klar, aber ich will ja weiterhin das Schließkreuz nutzen(lassen) und
da wird immer alles entladen.
Grüße Ralf
AW: Schließkreuz UF umbiegen?
Hajo_Zi

Hallo Ralf,
dann Deaktiviere das Kreuz und mache einen Schalter. 
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
Gruß Hajo
AW: Schließkreuz UF umbiegen?
Ralf

Hallo Hajo,
genau das möchte ich ja nicht, das Schließkreuz soll ja weiter benutzt werden können,
damit die ganze Sache dem Windows-Standard entspricht.
Grüße Ralf
Noch offen. oT
Ralf

oT
AW: Noch offen. oT
Nepumuk

Hallo,
so:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If CloseMode = vbFormControlMenu Then
        Cancel = 1
        Hide
    End If
End Sub

Gruß
Nepumuk
Genau, danke! oT
Ralf

oT
AW:UserForm Inhalte behalten
Hajo_Zi

Hallo Ralf,
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Cancel = True
Me.Hide
End Sub
Gruß Hajo
AW: Schließkreuz UF umbiegen?
Daniel

HI
schreibe doch einfach die Inhalte der Steuerelemente in Excelzellen.
Beim Initialisieren der Userform schreibtst den Inhalt der Zellen wieder in die Steuerelemente zurück.
dann bleiben die Inhalte sogar gespeichert, wenn du die Datei schießt (und speicherst)
Gruß, Daniel