Ich habe folgendes Problem ich möchte immer die letzte Zelle bzw. deren Wert (von einer Spalte oder Zeile) in eine andere Zelle kopieren könnt ihr mir helfen siehe anlage https://www.herber.de/bbs/user/25205.xls
danke im vorraus
Sub letzte()
Dim ende
ende = Cells(Rows.Count, 1).End(xlUp).Row
Range("b2").Value = ende
End Sub