Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

leere Tabellenblätter löschen

Forumthread: leere Tabellenblätter löschen

leere Tabellenblätter löschen
Stefan
Hallo nochmal,
kennt jemand den Code um alle leeren Tabellenblätter zu löschen ?
:-)
Gruß
Stefan
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: leere Tabellenblätter löschen
20.08.2010 14:51:12
Rudi
Hallo,
Sub ttt()
Dim wks As Worksheet
For Each wks In Worksheets
If Application.CountA(wks.Cells) = 0 And Worksheets.Count > 1 Then
Application.DisplayAlerts = False
wks.Delete
Application.DisplayAlerts = True
End If
Next
End Sub

Geprüft werden aber nur Zellen.
Gruß
Rudi
Anzeige
AW: leere Tabellenblätter löschen
20.08.2010 14:54:36
Stefan
DANKE !!!!!
:-)
Stefan
Anzeige
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18