Clever-Excel-Forum

So dala

in meinem Code passiert was (tatsächlich)

Das soll passierem, solange in Spalte "A" was steht, und in Spalte "Z" nix steht.
Mir fehlt die Schhleife dazu. Damit geht das ganze los:

loletzte = IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count)

loletzte als long definiert.

Hallo Dieter

warum loletzte so kompliziert, mit If Auswertung? Geht auch einfacher. Hier mal ein Code zum spielen.
Wenn For Next mit der Zeile 1 beginnen soll bitte selbst aendern, so startet er ab der Zeile 2.

mfg Gast 123

Code:
Sub Test()

loletzte = Cells(Rows.Count, 1).End(xlUp).Row

'Schleife ab Zeile 2 bis loletzte

For j = 2 To loletzte

   If Cells(j, "A") <> "" And Cells(j, "Z") = Empty Then

   'Hier dein Ereignis was du machen willst ........

   End If

Next j

End Sub

Zitat:warum loletzte so kompliziert, mit If Auswertung

vermutl weil heute (Pfingstsonntag) das Denken eingeschränkt wurde. Danke erstmal

Hallöchen,

So eine "kompliziere" Lösung ist eigentlich dafür gedacht, dass man bei einer leeren Spalte auch in die Zeile 1 kommt... Ich glaube aber, die sieht noch etwas anders aus .Bin gerade am Smartphone und da sieht einiges anders aus Wink

Geil. läuft

danke und schönes Rest-WE

DieterB

Gast 123

DieterB

schauan

DieterB