mit dieser Funktion kann die letzte Zeile eines Bereichs abgefragt werden. Allerdings funktioniert das nicht, wenn der Bereich grösser als eine Zelle ist.
Fragen:
- wie muss die Erweiterung erfolgen, dass das dies auch bei einer Zeile funktioniert?
- wie kann muss die Funktion lauten, dass die erste Zeile ausgegeben wird?
Danke und Gruss, Peter
Public Function sLetzteZeile(Bereich As String)
sLetzteZeile = Split(Split(Range(Bereich).Address(1, 0), ":")(1), "$")(1)
End Function