Kann mir jemand sagen was diese Zeile hier heißt?



Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: Kann mir jemand sagen was diese Zeile hier heißt?
von: Niko
Geschrieben am: 27.06.2002 - 09:08:53

Sub DeleteB()
Dim i As Long, j As Long, maxzeilen As Long
maxzeilen = Range("A65536").End(xlUp).Row ' <----was bringt diese Zeile vor allem das End ???
i = 1
j = 0
Do While i < maxzeilen
If Cells(i, 2).Value = "" Then ' wenn in der 2. Spalte nichts steht dann
Rows(i).Delete ' löschen !!
j = j + 1
If i + j >= maxzeilen Then Exit Sub
i = i - 1
End If
i = i + 1
Loop
End Sub

nach oben   nach unten

Letzte beschriebene Zelle in Spalte A (n/t)
von: @lex
Geschrieben am: 27.06.2002 - 09:20:25

-

nach oben   nach unten

Re: Kann mir jemand sagen was diese Zeile hier heißt?
von: MikeS
Geschrieben am: 27.06.2002 - 09:21:13

Hallo,

mit Range("A65536").End(xlUp).Row

wird der Variablen "maxzeilen" die letzte beschriebene Zeile
(geprüft wird Spalte A) übergeben.

Ciao MikeS


nach oben   nach unten

und xlup bzw xldown ist Leserichtung?
von: Niko
Geschrieben am: 27.06.2002 - 09:25:01

DANKE

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Verknüpfte Zellen"