Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
268to272
268to272
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Worksheets löschen

Forumthread: Worksheets löschen

Worksheets löschen
17.06.2003 14:51:38
Alex
Hallo Leute,

wie löscht man alle Worksheets, die mit dem Namen Tabelle anfangen.

Wie man ein bestimmtes Worksheets lösch, wies ich, kann mein Problem trotzdem nicht lösen

Danke Alex

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Worksheets löschen
17.06.2003 14:55:47
Yvonne

Hallo Alex,

probier's mal hiermit.

Sub loeschen()
Dim sht As Worksheet
Application.DisplayAlerts = False
For Each sht In ActiveWorkbook.Sheets
If Left(sht.Name, 7) = "Tabelle" Then
sht.Delete
End If
Next sht
Application.DisplayAlerts = True

End Sub


Gruß, Yvonne

Anzeige
Re: Worksheets löschen
17.06.2003 14:56:03
ChrisL

Hi Alex

Gruss
Chris

Re: Worksheets löschen
17.06.2003 14:57:22
Mike E.

Hallo Alex,

Sub h()

For i = 1 To Worksheets.Count

If InStr(Worksheets(i).Name, "Tabelle") Then
Worksheets(i).Delete
i = i - 1
End If

Next i

End sub

Gruß
Mike

Re: Worksheets löschen
17.06.2003 15:00:20
L.Vira

Option Explicit
Sub WS()
Dim WS As Worksheet
Application.DisplayAlerts = False
For Each WS In Worksheets
If WS.Name Like "Tabelle*" Then
If Not Worksheets.Count = 1 Then
WS.Delete
End If
End If
Next
Application.DisplayAlerts = True
End Sub

Anzeige
Re: Worksheets löschen
17.06.2003 20:39:59
Alex

Hallo Leute,

es läuft, Danke

Alex

;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige