VBA Excel - Zeile Inhalt unter

kopieren Ich möchte den gesamten Inhalt einer Zeile in die nächste Zeile kopieren, wenn es einige Kriterien erfüllt. Also, wenn ich in Zeile 3 bin, möchte ich, dass Zeile 4 den genauen Inhalt von Zeile 3 hätte.VBA Excel - Zeile Inhalt unter

Das Problem ist, dass Zeile 4 bereits einen eigenen Inhalt hat. Wie kann ich es nach unten verschieben und dann meine gewünschten Inhalte kopieren?

Ich habe nur die Entirerow.Copy versucht und spezielle Methode einfügen, aber das scheint nicht zu funktionieren.

Worksheets("Sheet 1").Range("A2").EntireRow.Copy 
Worksheets("Sheet 1").Range("A3").PasteSpecial

Irgendwelche Tipps?

Quelle

2017-03-16 António Pires

Mögliche Duplikat [Excel-VBA-Makro - Kopieren und kopierten Zellen einfügen] (http://stackoverflow.com/questions/21455635/excel-vba-macro- Kopieren-und-Einfügen-Kopieren-Zellen) –

Probieren Sie etwas wie dem folgenden Code:

With Worksheets("Sheet 1") 
    .Rows(Range("A2").Row).Copy 
    .Range("A3").Insert Shift:=xlDown 
End With

Quelle

2017-03-16 18:39:54

Das ist genau das! Vielen Dank! –

VBA Excel - Zeile Inhalt unter

Antwort

Verwandte Themen