Format übernehmen
07.09.2016 08:59:56
Berndt
mit folgenden Code füge ich nach der letzten Zeile eine neue Zeile ein:
Sub Makro3()
Dim letztezeile As Long
letztezeile = ActiveSheet.Cells(Rows.Count, 2).End(xlUp).Row
Rows(letztezeile + 1).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub
Nun möchte ich aber auch, dass das Format mit übernommen wird von der letzten Zeile.
Was muss ich am Code dafür abändern?
VG Berndt