Hallo zusammen,

Mit ist gerade etwas sehr Eigenartiges passiert. Ich habe auf einem Button folgendes Ereignis:
 

Private Sub ExcelExportBut_Click()
On Error GoTo Err 
DoCmd.OutputTo acOutputQuery, "A_RechMonatlichExport2", "Excel Workbook (*.xlsx)", , True 
Exit Sub 
Err: 
ErrSource = "ExcelExportBut_Click": ErrMessage 
End Sub

Beim ersten Durchgang hat alles funktioniert und die Abfrage A_RechMonatlichExport2 mit ziemlich komplexem Inhalt erzeugte eine Excel Datei. Beim zweiten Durchgang wollte ich testen was passiert wenn die Excel Datei noch geöffnet ist und die Abfrage "Wollen Sie überschreiben" kommen, bei der habe ich "Ja" geklickt. Daraufhin kam die gewünschte Fehlermeldung, ABER die Abfrage würde auch gelöscht?!? A_RechMonatlichExport2 ist jetzt nur noch:
 

SELECT;

Ich habe ziemlich viel Arbeit verloren, kann mir das immer wieder passieren? Wie kann ich das verhindern?