Hallo,
habe ein Makro zum löschen von Tabellenblättern.
&ltpre&gt
Sub loeschen()
Dim h As Integer
h = 1

Dim i As Integer
i = 1

h = Sheets.Count

MsgBox (h)

For i = 2 To h Step 1
Sheets(i).Delete
Next i

MsgBox ("Fertig")

End Sub&lt/pre&gt
Da es bis zu 50 Tabellenblätter sind, die gelöscht werden, bräuchte ich eine Möglichkeit, diese zu löschen, ohne das Excel nachfrägt, ob er auch wirklich löschen soll.
Gruß ich