Eine wohl einfache Aufgabe, aber ich bin seit Stunden am Suchen und finde die Lösung nicht:-)
Ich habe eine Liste mit x Zeilen. Ich werde das für 60 verschiedene Files machen müssen, und die Anzahl Zeilen kann unterschiedlich sein.
Also ich bin nun soweit, dass ich unter jeder bestehenden Zeile eine leere Zeile eingefügt habe.
Nun möchte ich, dass er in dieser leeren Zeile die Werte von der oberen Zeile kopiert.
Habe keinen clue wie das gehen soll..
Hier der Code zum einfügen der leeren Zeile:
'insert empty rows
' For ii = Cells(Rows.Count, 3).End(xlUp).Row To 3 Step -1
' For EZ = 1 To 1
' .Range("a" & ii).EntireRow.Insert shift:=xlDown
' Next EZ
' Next ii
Kann mir jemand weiterhelfen?
Vielen lieben Dank
Patricia
https://www.herber.de/bbs/user/143667.xlsm