Zum Hauptinhalt springen

Wie kann man schnell Leerzeichen zwischen jeder Zeile in Excel einfügen?

Author: Sun Last Modified: 2025-05-28

In Excel können Sie das Kontextmenü verwenden, um eine Zeile über der aktiven Zeile auszuwählen, aber wissen Sie, wie man leere Zeilen in jede Zeile wie im folgenden Screenshot einfügt? Hier stelle ich einige Tricks vor, um diese Aufgabe schnell zu erledigen.
insert space between each row

Leere Zeilen zwischen jeder Zeile mit der Sortierfunktion einfügen

Leere Zeilen/Spalten zwischen jeder Zeile/Spalte mit Kutools für Excel einfügengood idea3

Leere Zeilen zwischen jeder Zeile mit VBA-Code einfügen


Leere Zeilen zwischen jeder Zeile mit der Sortierfunktion einfügen

Um leere Zeilen zwischen jeder Zeile einzufügen, können Sie zunächst zweimal eine Reihe von Zahlen ausfüllen und dann die Zahlen sortieren.

1. Füllen Sie in einer angrenzenden Zahl eine Reihe von Zahlen aus, um die Zeilennummer abzugleichen.
fill a series of numbers in adjacent column

2. Kopieren Sie die Seriennummern und fügen Sie sie in die Zelle nach der letzten Nummer ein.
Copy and paste the series numbers in the cell following the last number

2. Wählen Sie alle Seriennummern aus und klicken Sie auf Daten > Sortieren von der kleinsten zur größten.
click Data > Sort Smallest to Largest

3. Im erscheinenden Sortierwarnung Dialogfenster behalten Sie die Option Auswahl erweitern aktiviert, klicken Sie auf Sortieren.
keep Expand the selection option checked

Jetzt wurden die Abstände zwischen jeder Zeile eingefügt. Sie können die Spalte mit den Seriennummern später entfernen.
the spaces have been inserted between each row


Leere Zeilen/Spalten zwischen jeder Zeile/Spalte mit Kutools für Excel einfügen

Wenn Sie schnell und einfach leere Zeilen oder Spalten zwischen jeder Zeile oder Spalte einfügen möchten, können Sie das Hilfsprogramm „Leere Zeilen & Spalten einfügen“ von Kutools für Excel verwenden, mit dem Sie den Abstand der Zeilen und die Anzahl der leeren Zeilen nach Bedarf angeben können.

Kutools für Excel bietet über 300 erweiterte Funktionen, um komplexe Aufgaben zu vereinfachen und Kreativität sowie Effizienz zu steigern. Durch die Integration mit KI-Funktionen automatisiert Kutools Aufgaben präzise und macht das Datenmanagement mühelos. Detaillierte Informationen zu Kutools für Excel... Kostenlose Testversion...

Nach der Installation von Kutools für Excel gehen Sie bitte wie folgt vor:

1. Wählen Sie den Datenbereich aus, in den Sie leere Zeilen oder Spalten einfügen möchten, und klicken Sie auf Kutools > Einfügen > Leere Zeilen & Spalten einfügen.
 click Insert Blank Rows & Columns feature of kutools

2. Im Leere Zeilen & Spalten einfügen Dialogfenster aktivieren Sie die Option Leere Zeilen oder Leere Spalten je nach Bedarf und legen Sie die Optionen für Abstand von und Zeilen.
set options in the dialog box

3. Klicken Sie auf Ok.

Leere Zeilen zwischen jeder Zeile einfügen  Leere Spalte zwischen jeder Spalte einfügen
Inert blank rows between each row	Insert blank column between each column

Tipp: Dieses Hilfsprogramm unterstützt Rückgängig machen mit Strg + Z.


Leere Zeilen zwischen jeder Zeile mit VBA-Code einfügen

Wenn Sie sich mit Makrocode auskennen, hier ist ein Code, der Ihnen ebenfalls helfen kann.

1. Drücken Sie Alt + F11, um das Fenster Microsoft Visual Basic für Applikationen zu öffnen.

2. Klicken Sie auf Einfügen > Modul, dann kopieren und fügen Sie den folgenden Code in das Modul ein.

VAB: Leerzeichen zwischen Zeilen einfügen

Sub RowsInsertInSelectCells()
'UpdatebyExtendoffice20180801
Dim xWS As Worksheet
Dim xCR, xR, xCC, xC, xFC, xFR As Long
Dim xFNum As Integer
Dim xRg, xCRg As Range
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 0 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xWS = ActiveWorkbook.ActiveSheet
    Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Count > 0 Then
        xCR = xRg.Rows.Count
        xCC = xRg.Columns.Count
        xR = xRg.Row
        xC = xRg.Column
   Application.ScreenUpdating = False
    For xFC = 0 To xCC - 1
        For xFR = xCR To 1 Step -1
            xWS.Cells(xR + xFR, xC + xFC).Insert
        Next
    Next xFC
    Application.ScreenUpdating = True
    End If

End Sub

3. Drücken Sie die F5 Taste, um den Code auszuführen. Ein Dialogfenster erscheint, das Sie daran erinnert, die zu bearbeitenden Daten auszuwählen.
vba code to select the data range

4. Klicken Sie auf OK. Jetzt wurden die Abstände zwischen den ausgewählten Zeilen eingefügt.
 the spaces have been inserted between selected rows

Demo: Leere Zeilen oder Spalten mit bestimmten Abständen einfügen

 

Beste Büroproduktivitätswerkzeuge

🤖 Kutools AI-Assistent: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung   |  Code generieren  |  Benutzerdefinierte Formeln erstellen  |  Daten analysieren und Diagramme generieren  |  Erweiterte Funktionen aufrufen
Beliebte Funktionen: Finden, Hervorheben oder Doppelte markieren   |  Leere Zeilen löschen   |  Spalten oder Zellen kombinieren ohne Datenverlust   |   Runden ...
Erweiterte SVERWEIS: Mehrfachkriterien SVERWEIS    Mehrfachwert SVERWEIS  |   Mehrblatt-SVERWEIS   |   Fuzzy Match ....
Erweiterte Dropdown-Liste: Schnell Dropdown-Liste erstellen   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl Dropdown-Liste ....
Spaltenmanager: Eine bestimmte Anzahl von Spalten hinzufügen  |  Spalten verschieben  |  Sichtbarkeitsstatus ausgeblendeter Spalten umschalten  |  Bereiche & Spalten vergleichen ...
Hervorgehobene Funktionen: Gitterfokus   |  Entwurfsansicht   |   Erweiterte Formelleiste    Arbeitsmappe & Arbeitsblatt-Manager   |  AutoText-Bibliothek (Auto Text)   |  Datumsauswahl   |  Daten zusammenführen   |  Zellen verschlüsseln/entschlüsseln    E-Mail senden nach Liste   |  Spezialfilter   |   Spezialfilter (Filtern fett/kursiv/durchgestrichen...) ...
Top15 Werkzeugsets12 Textwerkzeuge (Text hinzufügen, Bestimmte Zeichen löschen, ...)   |   50+ Diagramm typen (Gantt-Diagramm, ...)   |   40+ Praktische Formeln (Alter basierend auf dem Geburtsdatum berechnen, ...)   |   19 Einfügewerkzeuge (QR-Code einfügen, Bild aus Pfad einfügen, ...)   |   12 Konvertierungswerkzeuge (In Wörter umwandeln, Währungsumrechnung, ...)   |   7 Konsolidieren & Aufteilen Werkzeuge (Erweiterte Zeilen zusammenführen, Zellen aufteilen, ...)   |   ... und mehr

Verbessern Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen zur Steigerung der Produktivität und Zeitersparnis.  Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...


Office Tab bringt eine Registerkartenoberfläche zu Office und macht Ihre Arbeit viel einfacher

  • Aktivieren Sie die Bearbeitung und das Lesen mit Registerkarten in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters, anstatt in neuen Fenstern.
  • Steigert Ihre Produktivität um50 % und reduziert täglich hunderte von Mausklicks für Sie!