Hallo Spezialisten,
ich weiß nicht weiter. Es geht darum Daten in Excel zu "archivieren". Genauer gesagt, überträgt Excel Daten von einem Arbeitsblatt, das jederzeit geändert werden können auf ein anderes, das die Daten nacheinander wegschreibt. Dazu hab ich ein Makro geschrieben, was auch wunderbar funktioniert. Um sicher zu gehen, dass die Daten auch wirklich archiviert sind, habe ich beim schließen eine Massage Box eingefügt, die genau den Sachverhalt abfragt. (Ich möchte das nicht in Hintergrund ablaufen lassen.)
Die Prozedur dafür steht in "DieseArbeitsmappe":
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Select Case MsgBox("Vorm Schließen archivieren?", _
vbQuestion & vbYesNoCancel, "Archivieren")
Case vbYes
Call Archivieren
Case vbNo
ActiveWorkbook.Close
Case vbCancel
Cancel = True
End Select
End Sub
Der Fall vbYes und vbCancel funktioniert. Was mir kopfzerbrechen verursacht ist das No. Hier muß ich zweimal auf "nein" klicken, bevor Excel die Arbeitsmappe schließt. Ich kann mir nur eins vorstellen, dass es im Hintergrund noch einmal den Schließendialog anzeigt, nachdem ich das erste Mal "Nein" gedrückt habe. Kann das sein? Wenn ja, wie kann ich das verhindern? Oder gibt es eine elegantere Lösung?
1000 Dank im Voraus! |