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

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

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)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige