VBA - Letzte Zeile copy & paste
14.10.2016 09:49:34
Nik
habe ein Makro, welches das Ende einer bestimmten Zeile bestimmt und dann einen Wert kopiert und einfügt.
Kann mir bitte jemand erklären was der Teil "letztezeile" genau macht?
Ich verstehe leider nicht wo das Makro genau ansetzt, also welche Zeile Spalte, etc. Und wie das im Zusammenhang mit dem .offset funktioniert.
Wenn mir jemand behilflich sein könnte, wäre das sehr nett.
Danke im Voraus!
Gruß
Nik
https://www.herber.de/bbs/user/108779.xlsm
Public Sub COPY_MAKRO()
Dim i As Integer
For i = 11 To 100
letztezeile = ActiveSheet.Cells(Rows.Count, i).End(xlUp).Offset(0, 1).Select
Selection.Copy
With ActiveCell
Range(.Offset(0, 1), .Offset(0, 38)).Select
End With
ActiveSheet.Paste
Next i
End Sub