Hilfe zu letzter zeile (xlUp) aus Bereich
12.02.2009 10:53:00
chris
habe schon versucht im Forum zu suchen finde aber nichts passendes.
Ich benötige die letzte zeile aus einem Bereich.
Die letzte zeile also Zelle einer Spalte ist kein Problem.Das mache ich so:
Sub neu()
MsgBox ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
End Sub
Dies Bringt mir den letzten Wert aus Spalte 1 bzw. die letzte beschriebene Zeile als Nummer.
Ich möchte aber das A1 bis A10 nicht geprüft werden sondern z.b nur der Bereich A11 bis A10000
Also möchte ich als ergebniss nicht bekommen 6 wenn in Zelle A6 der letzte wert steht.
Sondern 10
Erst wenn in Zelle A13 ein Wert steht soll 13 ausgegeben werden.
Ich habe es schon so versucht aber das klappt nicht.
Sub neu()
Set cb = Range("A10:A20")'hier zum beispiel mein gewünschter bereich.
MsgBox ActiveSheet.Range(cb).Cells(Rows.Count, 1).End(xlUp).Row
End Sub
Danke schon im vorraus an alle helfer !
gruß Chris