VBA: Bereich x-mal kopieren
18.12.2014 11:59:15
robin
ich habe folgendes Problem, bzw. komme mit meinen (geringen) VBA Kenntnissen nicht weiter.
In meiner Arbeitsmappe befinden sich 2 Tabellenblättern (Blatt1 und Blatt2)
Nun möchte ich einen Bereich auf Blatt2 kopieren und X-mal darunter einfügen. X ist in Zelle A1 auf Blatt1 festgelegt.
Kopieren und einfügen passt auch soweit nur leider schaffe ich es nicht die Anzahl der Kopien einzuarbeiten:
hier mal der Code:
Sub Autocopy()
Dim iRow As Long
Sheets("Blatt2").Range("A1").CurrentRegion.Copy
With Sheets("Blatt2")
iRow = .Cells(.Rows.Count, 1).End(xlUp).Row + 2
.Range("A" & iRow).PasteSpecial
End With
End Sub
Ich benutze Office Für Mac 2011.
Wäre super wenn mir jemand einen Tipp geben kann!
Viele Grüsse
Robin
Anzeige