title image


Smiley Bestätigung vor Schließen einer UserForm?
Hallo Ihr VBA-Experten(innen),Hat jemand eine Ahnung wie man in Excel97 eine Abfrage plazieren kann ob ein UserForm geschlossen werden soll. Leider besitzt ein UserForm rechts oben dieses [X] ueber welches es geschlossen und damit aus dem Speicher entfernt wird. Damit sind dann alle vorher eingegeben Werte futsch.Nun moechte ich aber dem Anwender nicht zumuten, dass er alle Eingaben noch einmal machen darf, wenn er aus Versehen dieses [X] geklickt hat. Er soll dann zumindest bestaetigen dass er die Dialogbox wirklich schliessen will und alle Werte verliert.Eine Ereignis wie z.B. BeforeUnload(Cancel) gibt es offensichtlich nicht. Lediglich UserForm_Terminate (jedoch ohne Cancel) ist moeglich. Das Beispiel in der Onlinehilfe sagt beim "Terminate Ereignis" dass jetzt 100 mal gepiepst wird, hilft mir aber ueberhaupt nicht (Besten Dank an Bill, es ist WIKLICH zum Piepen was Du einem zumutest!!!).Bei UserForm_Terminate muss offensichtlich die Dialogbox im Speicher sein, da der Wert von TextBox1 in der Messagebox noch zurueckgegeben wird.OK, ich koennnte demnach die Werte aller Steuerelemente auslesen, in einer temporaeren Datei speichern und bei der Initialisierung wieder zurueck schreiben. Halte ich aber fuer eine umstaendliche Loesung.Weiss jemand einen Weg oder Ausweg???Mein bisheriger Versuch wie folgt, welcher aber leider nicht funktioniert, da die Dialogbox auf jeden Fall geschlossen wird!!!:Private Sub UserForm_Terminate() Dim varResponce As Variant varResponce = MsgBox("Please confirm, that you would like to" & vbCrLf & vbCrLf & vbTab & "Close the Dialogbox?", vbQuestion + vbYesNo + vbDefaultButton2, "Close Dialogbox") If varResponce = vbYes Then MsgBox "Yes selected " & Me!TextBox1 '''Dialogbox schliessen Else MsgBox "No selected " & Me!TextBox1 '''Dialogbox NICHT schliessen End IfEnd SubGruss Norbert

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: