Schleife
20.04.2007 11:12:59
Christian
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
Anzeige