Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
2000to2004
2000to2004
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

copy& duplicate zeile untereinander in einer Loop

Forumthread: copy& duplicate zeile untereinander in einer Loop

copy& duplicate zeile untereinander in einer Loop
28.01.2025 13:57:16
Daniel
Hallo liebes Forum,
ich würde gerne in einer DatenTabelle jeweils eine komplette Zeile (mit Inhalt) kopieren und dann in der darunterliegenden Zeile einfügen, so dass sich die enstprechenden anderen zeilen (nach unten verschieben). Und das ganze als loop, so dass das makro das ganze worksheet durchgeht und die entsprechenden zeilen kopiert und in der nächsten Zeile einfügt.

Vielen Dank für eure Hilfe,
Daniel
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: copy& duplicate zeile untereinander in einer Loop
28.01.2025 14:37:49
Piet
Hallo

am einfachsten so, mit dem Makro kannst du alle Zellen bis Zeile 2 verdoppeln.
Warnung: --> das Makro prüft NICHT ob das was du tust auch in Ordnung ist? Das kopiert einfach!
Voraussetzung ist, das Spalte A mit Daten gefüllt ist. Sonst musst du lz1 auf eine andere Spalte setzen.

mfg Piet 

Sub Zeilen_verdoppeln()

Dim j As Long, lz1 As Long

    lz1 = Cells(Rows.Count, 1).End(xlUp).Row

    For j = lz1 To 2 Step -1

        If Cells(j, 1).Value > "" Then

           Rows(j).Copy

           Rows(j + 1).Insert shift:=xlDown

        End If

    Next j

    Application.CutCopyMode = False

End Sub
Anzeige

Forumthreads zu verwandten Themen

Z verschieben
Peter

Hallo
ich bin auf der suche nach einem makro, dass jede zweite zeile in die darüberliegende zeile verschiebt.
folgende inhalte sind gefüllt
a1..z1
a2..z2
a3..z3
usw
Das Makro soll die a2..z2 hinter die a1..z1 verschieben aa1..az1
dito soll die 4. zeile (zeil...
17.08.2009 15:00:47
Thread-ID: 1096421
18 Beiträge
Array: Zeilen einschieben
Winfried

Hallo zusammen, ich versuche eine Tabellenerweiterung zu beschleunigen, bei der ich zwischendurch Zeilen einfü _ ge und den Rest der Tabelle um diese Zeile weiter nach unten verschieben muss. Wenn ich das (per VB) im Tabellenblatt mache, dauert das fast ne Stunde (Anfängliche 5.800 _ Datensät...
09.01.2017 19:26:27
Thread-ID: 1534051
4 Beiträge
Sortiervorgang ist sichtbar
mike49

Hallo zusammen,
in meiner Arbeitsmappe sind die Module "Linie" und "ModSortierung". Nach erflgtem Eintrag wird nach Betätigung der Return-Taste die Sortierung am Bildschirm sichtbar. Das sollte nicht sein. Was ist hier fehlerhaft?
Modul "Linie":
Option Explicit
Sub LinieSetzen(...
22.01.2010 14:45:38
Thread-ID: 1132083
4 Beiträge
VBA Fehler -2147417848
Grünauer

Hallo Experten, hallo Helfer,
ich komme einfach nicht weiter bei meiner benötigten Datei und bevor ich jetzt ganz verzweifle meine Bitte an Euch eine Blick darauf zu werfen. Ihr habt bestimmt die Lösung dafür.
Beim Schließen der Excel Datei soll in der "Tabelle1aktiv" jeder Datensatz de...
12.12.2016 14:29:30
Thread-ID: 1529720
2 Beiträge
Anzeige
Liste Sortieren Text D mit U Werten
Timetakt

Hallo zusammen,
ich bräuchte hilfe, ich habe eine Lösungsart ausprobiert, nur das meine Lösung bei größeren Listen zu Fehler führen kann.
10 Werte sollen dabei aus der liste geholt werden.
1. Problem: In der Liste ist der Wert vom Text nicht nur Spalten versetzt sondern auch Zeilen...
02.04.2019 13:25:59
Thread-ID: 1684606
11 Beiträge
Namen definieren, m. Bereich.Verschieben - VBA
Peter

Guten Tag
Ich möchte verschiedene Bereiche in einer umfangreichen Tabelle mit Namen benennen.
Dazu habe ich in Tabelle "Namen" in der Spalte A die vorgesehenen Namen und in Spalte B die Formel.
Da die Anzahl Zeilen in den betreffenden Bereichen variabel sind und ich jeweils nicht di...
15.12.2007 09:59:00
Thread-ID: 935054
5 Beiträge
Anzeige
Inhalt einer Zeile speichern und veschieben
Tekin

Hallo zusammen,
ich habe folgendes Problem bei VBA. Ich hoffe, dass mir einer von euch helfen kann.
Folgendes:
Ich habe einen Makro, womit ich Zeilen von einer Tablle in eine andere Tabelle kopiere. Bevor ich eine Zeile kopiere, möchte ich in der Zieltabelle die letzte Zeile mit Inh...
13.03.2019 14:12:49
Thread-ID: 1681038
5 Beiträge
Zellinhalte verschieben und Zeile dann löschen
schlambambomil

Hallo,
möchte gerne Zellinhalte in eine andere Spalte verschieben.
Im beigefügten Bspl. ist in den ersten 8 Zeilen ein Text importiert.
In der ersten Zeile ist es so wie es aussehen sollte.
Der Inhalt der zweiten Zeile geht über zwei Zeilen (A2-G2 und D3-G3).
Zeile 4 ist wie...
18.10.2014 17:07:30
Thread-ID: 1387317
2 Beiträge
Anzeige
Makros Zeilen abhängig vom Inhalt hinzufügen
Skylaz

Liebe Experten,
ich habe eine Auflistung verschiedener Dinge in Excel. diese Auflistung besteht aus verschiedenen Abschnitten. Ich möchte für jeden Abschnitt eine separate Zeile einfügen können.
Für den ersten Abschnitt klappt das super, da darüber ja keine neuen Zeilen eingefügt werde...
26.08.2019 14:01:45
Thread-ID: 1709504
3 Beiträge
Makro "Inhalt der aktiven Zeile verschieben"
Dirk

Hallo liebe Excelexperten,
leider bin ich bei der Rechere zu meinem Excelproblem bisher nicht fündig geworden, vielleicht könnt ihr mir helfen, dafür schon einmal herzlichen Dank!
Ziel:
Mit Hilfe eines Makros möchte ich eine Prioritätenliste steuern können, Zeilen-Einträge wandern in...
15.03.2005 20:32:08
Thread-ID: 585708
1 Beitrag
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum