Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
904to908
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
904to908
904to908
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Arbeitsblätter löschen

Arbeitsblätter löschen
13.09.2007 10:36:00
Robert
Hallo,
ich möchte per VBA in einer Mappe alle Arbeitsblätter außer "Zonentabelle" löschen.
Kann mir jemand den Code dazu nennen?
Grüße,
Robert

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

Betreff
Datum
Anwender
Anzeige
AW: Arbeitsblätter löschen
13.09.2007 10:40:15
Wolli
Hallo Robert, so sollte es gehen. Nicht getestet! Vorsicht! Gruß, Wolli

sub AB_loeschen()
dim s as sheet
application.displayalerts = false
for each s in activeworkbook.sheets
if s.name  "Zonentabelle" then s.delete
next s
application.displayalerts = true
end sub


AW: Arbeitsblätter löschen
13.09.2007 10:48:00
Hoffi
Hallo Robert,

Sub löschen()
Dim wks As Worksheet
For Each wks In ActiveWorkbook.Sheets
Select Case wks.Name
Case "Zonentabelle"
Application.DisplayAlerts = True
Case Else
Application.DisplayAlerts = False
wks.Delete
End Select
Next
End Sub


Grüße
Hoffi

Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige