Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
512to516
512to516
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblatt löschen per VBA ???

Forumthread: Tabellenblatt löschen per VBA ?

Tabellenblatt löschen per VBA ?
08.11.2004 13:36:05
Birgit
Tag zusammen!
Habe folgende Frage:
Per Makro sollen allen Tabellenblätter gelöscht werden, bis auf das aktivierte.
Wie macht man soetwas ?
Gruß
Birgit
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt löschen per VBA ?
08.11.2004 13:45:39
Rolf
Hallo Birgit,
versuch's mal mit folgendem Makro
fG
Rolf

Sub blätter_löschen()
Dim sh As Worksheet, actSh As Worksheet
Set actSh = ActiveSheet
For Each sh In Worksheets
If Not sh.Name = actSh.Name Then sh.Delete
Next
End Sub

AW: Tabellenblatt löschen per VBA ?
XULE 
Public Sub lösch()
Application.DisplayAlerts = False
For Each ws In ThisWorkbook.Sheets
If ws.Name <> ActiveSheet.Name Then
ws.Delete
End If
Next
Application.DisplayAlerts = True
End Sub

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige