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

Schleife

Schleife
20.04.2007 11:14:00
Christian
hallo zusammen,
wie kann ich folgende Schleife abändern, dass sie nicht nur für Spalte 1 gilt, sondern für die Spalten 1 bis 14 (A:N)? Also ich meine eine Schleife in einer Schleife, erst Spalte A überprüfen auf volle Zellen und löschen , dann B, u.s.w. wahrscheinlich brauche ich noch irgendeine Laufvariable für die Spalte, aber dafür reichen meine Kenntnisse nicht aus.

Sub löschen()
Dim zeile As Long
For zeile = 65536 To 2 Step -1
If Cells(zeile, 1).Value  "" Then Rows(zeile).Delete
Next zeile
End Sub


Vielen dank für euere Hilfe
Gruß
Christian

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

Betreff
Datum
Anwender
Anzeige
AW: Schleife
20.04.2007 11:34:51
IngGi
Hallo Christian,
so?

Sub löschen()
Dim zeile As Long
Dim spalte As Integer
For zeile = 65536 To 2 Step -1
For spalte = 1 To 14
If Cells(zeile, spalte).Value  "" Then Rows(zeile).Delete
Exit For
Next 'spalte
Next 'zeile
End Sub

So löscht das Makro aber alle Zeilen, in denen in den Spalten A bis N irgend etwas steht! Ist das so gewollt.
Gruß

AW: Schleife
20.04.2007 11:54:31
Christian
Vielen Dank,
ja das ist so gewollt.
Gruß
Christian
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige