datei schließen
25.01.2004 12:51:57
Jonathan
ich habe ein Makro zum Schließen einer Datei:
Sub schliessen()
If Workbooks.Count > 1 Then
MsgBox "Es müssen erst alle anderen Excel Mappen geschlossen werden, bevor Sie diese schließen können.", vbCritical
Exit Sub
Else
ThisWorkbook.Saved = True
ThisWorkbook.Close
End If
End Sub
warum klappt dieser code nicht in
Private
Sub Workbook_BeforeClose(Cancel As Boolean)
Liebe Grüße
Jonathan