Clever-Excel-Forum

Code:
Sheets(„BlattA“).cells(2,2)=Sheets(„BlattB“).range(cells(2,2),cells(2,9))

Hallo zusammen,

Ich möchte auch einem Tabellenblatt B eine Zeile in Tabellenblatt A ab Zelle X einfügen, also quasi so wie oben.

Die Zelle 2,2 in Blatt A soll quasi als Startzelle dienen. Gibt es eine Möglichkeit das so, ohne den Kopierenbefehl zu benutzen, umzusetzen?

Danke im Vorraus
Max

Hallo Max,

würde ich so machen:

Code:
Dim Spalte

For Spalte = 2 To 9

    Sheets("BlattA").Cells(2, Spalte).Value = Sheets("BlattB").Cells(2, Spalte).Value

Next Spalte

Gruß,
Lutz

Lucker11

Lutz Fricke