Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
468to472
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
468to472
468to472
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

arbeitsblätter löschen

arbeitsblätter löschen
18.08.2004 13:35:55
mex75
hallo!
als vba neuling und plag mich dementsprechend:
problmstellung:
will alle arbeitsblätter bis auf das erste löschen.
mein versuch:
Dim i As Integer
Dim x As Integer
x = Application.ActiveWorkbook.Worksheets.Count
For i = 2 To x Step 1
Application.ActiveWorkbook.Worksheet.Delete

Next i
funktioniert leider nicht.
bitte um hilfe!

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: arbeitsblätter löschen
Ulf
For i = x To 2 Step -1
Ulf
AW: arbeitsblätter löschen
20.08.2004 16:11:17
mex
danke hat geklappt, obwohl mir nicht klar ist warum mein versuch nicht funktionierte (bei mir wurde ja nur in die andere richtung gezählt)
AW: arbeitsblätter löschen
18.08.2004 13:40:25
FloGo
Hallo Mex
so:

Sub blatt()
Dim i As Integer, x As Integer
x = Worksheets.Count
For i = x To 2 Step -1
Worksheets(i).Delete
Next i
End Sub

FloGo
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige