Excel - Daten in mehrere Zeilen aufteilen

Problem

Ich möchte eine Datenzeile in MS Excel in mehrere Zeilen mit denselben Daten aufteilen. Zum Beispiel habe ich einen Artikel mit einer Standardverpackungsgröße von 100 Stück pro Karton. Mein Kunde gibt eine Bestellung über 1.000 Stück auf. Ich möchte, dass dieser Bestellartikel 10 Mal im Arbeitsblatt wiederholt wird, wobei jede Zeile 100 Stück als Kartonmenge enthält.

Lösung

Wählen Sie zunächst die gesamte Zeile aus, die Sie wiederholen möchten.

Führen Sie den folgenden Code aus:

 Sub RepeatRow () iRow als Ganzzahl dim x als Ganzzahl dim y als Ganzzahl iRow = ActiveCell.Row x = InputBox ("Wie oft möchten Sie die ausgewählte Zeile anzeigen:") y = 1 Do Rows (iRow) .Copy Selection Shift einfügen: = xlDown y = y + 1 Schleife bis y = x Application.CutCopyMode = False End Sub 

• Durch Ausführen des Codes können Sie eingeben, wie oft die Zeile wiederholt werden soll.
• Wählen Sie in Ihrem Fall die Zeile mit 100 Stk. Aus, führen Sie den Code aus und geben Sie 10 ein. Sie werden sehen, dass aus Ihrer einen Zeile 10 Zeilen wurden.

Danke an Trowa für diesen Tipp.