habe hier ein Tabellenblatt, auf dem ich jede Zeile in doppelter Ausführung benötige. Wie kann ich per Makro alle Zeilen mit Inhalt verdoppeln?
Danke.
Gruß
Ralf
Um jede Zeile in Excel zu verdoppeln, kannst Du ein einfaches VBA-Makro verwenden. Folge diesen Schritten:
Öffne die Excel-Datei, in der Du die Zeilen verdoppeln möchtest.
Drücke ALT + F11, um den VBA-Editor zu öffnen.
Klicke auf Einfügen und dann auf Modul.
Füge den folgenden Code in das Modul ein:
Sub ZeilenVerdoppeln()
Dim i As Long
Dim letzteZeile As Long
letzteZeile = Cells(Rows.Count, 1).End(xlUp).Row
For i = letzteZeile To 1 Step -1
Rows(i).Copy
Rows(i + 1).Insert Shift:=xlDown
Next i
End Sub
Schließe den VBA-Editor und gehe zurück zu Excel.
Drücke ALT + F8, wähle ZeilenVerdoppeln aus und klicke auf Ausführen.
Jetzt sind alle Zeilen in Deinem Arbeitsblatt verdoppelt!
Fehler: "Das Makro kann nicht ausgeführt werden."
Fehler: Nur ein Teil der Zeilen wird verdoppelt.
letzteZeile definiert hast. Es könnte sein, dass die Daten in einer anderen Spalte stehen.Wenn Du keine Makros verwenden möchtest, kannst Du die Zeilen auch manuell verdoppeln:
STRG + C).STRG + V).Angenommen, Du hast eine Excel-Tabelle mit den folgenden Daten:
| Name | Alter |
|---|---|
| Max | 25 |
| Anna | 30 |
| Tom | 22 |
Nach der Anwendung des Makros wird die Tabelle so aussehen:
| Name | Alter |
|---|---|
| Max | 25 |
| Max | 25 |
| Anna | 30 |
| Anna | 30 |
| Tom | 22 |
| Tom | 22 |
Das ist eine einfache Möglichkeit, jede Zeile in Excel zu duplizieren!
=INDEX() oder =OFFSET(), um dynamische Bereiche zu erstellen, wenn Du Zeilen in einer großen Tabelle duplizieren möchtest.1. Wie kann ich nur bestimmte Zeilen in Excel verdoppeln? Du kannst den VBA-Code anpassen, um nur bestimmte Zeilen zu kopieren, indem Du eine Bedingung hinzufügst, die die Zeilen auswählt.
2. Gibt es eine Möglichkeit, die Verdopplung rückgängig zu machen?
Ja, Du kannst einfach STRG + Z drücken, um die letzte Aktion rückgängig zu machen, oder die Datei vor dem Verdoppeln speichern.
Jetzt bist Du bestens gerüstet, um jede Zeile in Excel zu verdoppeln!
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen