Das Archiv des Excel-Forums

Messagebox

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Messagebox
von: Angi

Geschrieben am: 08.10.2003 16:37:38

Immer wenn ich dieses Makro anwende, kommt beim schliessen der Datei noch eine Messagebox, das die gewünschte Tabelle wirklich gelöscht wird. Dies möchte ich jedoch nicht. Ich habe es schon mit 'ActiveWindow.SelectedSheets.Delete' versucht, was aber zu einer Fehlermeldung führt.

Private Sub Workbook_BeforeClose(Cancel As Boolean)


Sheets("Tabelle2").Select
ActiveWindow.SelectedSheets.Delete


Kann mir jemand helfen?


Angi
Bild


Betrifft: AW: Messagebox
von: Andi_H
Geschrieben am: 08.10.2003 16:45:11

Hi Angi,

löschen von Tabelle2 ohne rückfrage:


Private Sub Workbook_BeforeClose(Cancel As Boolean)
application.displayalerts = false
sheets("Tabelle2").delete
application.displayalerts = true
End Sub


Gruß

ANdi


 Bild

Excel-Beispiele zum Thema " Messagebox"

Bei Rechtsklick auf Diagramm MessageBox-Aufruf download