Anzeige
Archiv - Navigation
388to392
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
388to392
388to392
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Blätter löschen

Blätter löschen
25.02.2004 14:23:37
Klaus
Hallo zusammen
ich möchte alle tabellenblätter löschen, wo der name hinten eine Klammer hat. z.B. Hilfstabelle(1) oder Daten(2)
Kann jemand helfen?
Im voraus vielen dank
gruss klaus

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

Betreff
Datum
Anwender
Anzeige
AW: Blätter löschen
25.02.2004 14:44:39
PeterW
Hallo Klaus,
bei deinem angegebenen Level dürfte der Hinweis reichen, dass du lediglich das letzte Zeichen des Namens auf ")" zu prüfen brauchst (eventuell das Vorhandensein von "(", sofern in Blattnamen das ")" isoliert auftreten kann). Das dann in eine For-Each Schleife verpacken und fertig.
Gruß
Peter
AW: Blätter löschen
25.02.2004 14:50:47
K
Danke Peter
habs jetzt so gelöst:
Dim sh As Object
For Each sh In ActiveWorkbook.Sheets
If Right(sh.Name, 1) = ")" Then
On Error GoTo errhandler
Application.DisplayAlerts = False
sh.Delete
End If
Next
errhandler:
Application.DisplayAlerts = True
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige