Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 18:04:29
18.04.2024 16:33:24
Anzeige
Archiv - Navigation
660to664
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
660to664
660to664
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

exel Zeilen über makro löschen

exel Zeilen über makro löschen
05.09.2005 14:15:13
ronald
Hi zusammen
hab folgendes problem ich möchte gerne über ein Makro das alle Zeilen bis auf die jeweils 5te Zeile gelöscht werden z.b. soll am schluss nur noch die erste die 6te 11te Zeile usw. stehenbleiben. Kann mir da jemand helfen?
Gruss

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

Betreff
Datum
Anwender
Anzeige
AW: exel Zeilen über makro löschen
05.09.2005 14:38:00
Matthias
Hallo Ronald,

Sub Löschen()
Dim lz As Long, i  As Long
lz = Range("A65536").End(xlUp).Row 'letzte Zeile Spalte A ermitteln
For i = lz To 1 Step -1
If (i - 1) Mod 5 <> 0 Then
Rows(i).Delete
End If
Next i
End Sub

Gruß Matthias
AW: exel Zeilen über makro löschen
05.09.2005 14:45:05
ronald
Vielen dank klappt wunderbar :)
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige