Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zeilen in Excel duplizieren, Basis Zellwerte

Zeilen in Excel duplizieren, Basis Zellwerte
Stephan
Hallo,
habe folgendes Problem: Möchte in einer Tabelle Zeilen in Abhängigkeit eines Zellwertes in der jeweiligen Zeile vervielfachen, Hintergrund ist die Erzeugung einer Datenbank zum Etikettendruck. Beispiel Zeile 1, Spalte A: Produktname, Spalte B: Artikelnummer, Spalte C: Zahl der Etiketten (=Anzahl der zu erzeugenden Zeilen.
Würde mich sehr freuen wenn jemand eine Lösung parat hätte, mit meinen normalen Excel-Kenntnissen komme ich hier leider nicht weiter.
Vielen Dank schon im Voraus
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Zeilen in Excel duplizieren, Basis Zellwerte
19.12.2009 22:20:08
Reinhard
Hallo Stephan,
Sub tt()
Dim Zei As Long
For Zei = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
Rows(Zei + 1 & ":" & Zei + Cells(Zei, 3) - 1).Insert
Rows(Zei).Copy Destination:=Rows(Zei + 1 & ":" & Zei + Cells(Zei, 3) - 1)
Next Zei
End Sub

Gruß
Reinhard
Anzeige
AW: Zeilen in Excel duplizieren, Basis Zellwerte
20.12.2009 08:02:11
Stephan
Hallo Reinhard,
klasse hat funktioniert, vielen Dank für die superschnelle Antwort!
Stephan
AW: Zeilen in Excel duplizieren, Basis Zellwerte
19.12.2009 22:20:59
Josef
Hallo Stephan,
da wäre eine kleine aber aussagekräftige Beispieltabelle hilfreich.
Was, wann,wo - vorher-nachher
Gruß Sepp

Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Zeilen in Excel duplizieren: So klappt's


Schritt-für-Schritt-Anleitung

Um in Excel Zeilen zu duplizieren, die von einem Zellwert abhängen, kannst Du die folgende VBA-Makro-Lösung verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

  1. Öffne Excel und gehe zu der Datei, in der Du die Zeilen duplizieren möchtest.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.

  4. Füge den folgenden VBA-Code in das Modul ein:

    Sub tt()
       Dim Zei As Long
       For Zei = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
           Rows(Zei + 1 & ":" & Zei + Cells(Zei, 3) - 1).Insert
           Rows(Zei).Copy Destination:=Rows(Zei + 1 & ":" & Zei + Cells(Zei, 3) - 1)
       Next Zei
    End Sub
  5. Schließe den VBA-Editor und gehe zurück zu Excel.

  6. Führe das Makro aus: Gehe zu Entwicklertools > Makros, wähle tt und klicke auf Ausführen.

Mit diesem Code werden die Zeilen in Abhängigkeit von den Werten in Spalte C dupliziert. Ideal für die Erstellung einer Datenbank zum Etikettendruck!


Häufige Fehler und Lösungen

  • Problem: Das Makro funktioniert nicht.

    • Lösung: Stelle sicher, dass Du die Makros in Excel aktiviert hast. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center > Makroeinstellungen und aktiviere die entsprechenden Optionen.
  • Problem: Die Zeilen werden nicht korrekt dupliziert.

    • Lösung: Überprüfe, ob die Werte in Spalte C (Anzahl der Etiketten) korrekt eingegeben sind. Negative oder ungültige Werte können zu Fehlern führen.

Alternative Methoden

Wenn Du kein VBA verwenden möchtest, kannst Du auch die folgenden Methoden ausprobieren:

  1. Kopieren und Einfügen: Markiere die gewünschte Zeile, kopiere sie mit Strg + C, und füge sie mit Strg + V an der gewünschten Stelle ein. Dies ist weniger automatisiert und erfordert manuelles Arbeiten.

  2. Formeln nutzen: Du kannst mit Formeln arbeiten, um Werte zu multiplizieren oder zu summieren, und dann die Zeilen manuell duplizieren.


Praktische Beispiele

Hier ist ein praktisches Beispiel, wie Du eine Excel-Tabelle vorbereiten kannst, um mehrere Zeilen zu duplizieren:

Produktname Artikelnummer Anzahl der Etiketten
Produkt A 12345 3
Produkt B 67890 2

Nach Ausführung des Makros erhältst Du folgende Tabelle:

Produktname Artikelnummer Anzahl der Etiketten
Produkt A 12345 3
Produkt A 12345
Produkt A 12345
Produkt B 67890 2
Produkt B 67890

Tipps für Profis

  • Automatisierung: Wenn Du regelmäßig Zeilen duplizieren musst, erwäge, das Makro in eine Schaltfläche zu integrieren, um die Ausführung zu erleichtern.
  • Testen: Teste das Makro in einer Kopie Deiner Datei, um unerwünschte Änderungen zu vermeiden.
  • Dokumentation: Halte Deine VBA-Codes gut dokumentiert, um später Anpassungen vornehmen zu können.

FAQ: Häufige Fragen

1. Wie dupliziere ich eine Excel-Zelle?
Du kannst eine Zelle duplizieren, indem Du sie auswählst, Strg + C drückst und sie dann an der gewünschten Stelle mit Strg + V einfügst.

2. Kann ich auch Spalten duplizieren?
Ja, Du kannst die gleiche Methode verwenden, um eine Spalte zu kopieren. Wähle die gesamte Spalte aus, kopiere sie, und füge sie in eine andere Spalte ein.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige