wie kann ich aus einem Tabellenblatt 2 nach 1 vier Zeilen automatisch kopieren per Vba.
Die Zeilen sollen unterhalb der aktiven zelle eingefügt werden.
ich hätte es so versucht
z = ActiveCell.Row
wsV.Rows("5:5").Copy ws.Range("A" & z)
z = z + 1
wsV.Rows("6:6").Copy ws.Range("A" & z)
z = z + 1
wsV.Rows("7:7").Copy ws.Range("A" & z)
z = z + 1
wsV.Rows("8:8").Copy ws.Range("A" & z)
Das Problem ist dabei, dass es verbundene Zellen gibt von Zeile 5-8.
Hier gibt es dann Probleme.
Diese werden nicht übernommen.
Hat jemand dazu eine Lösung?