Wie füge ich schnell Leerzeichen zwischen den einzelnen Zeilen in Excel ein?

In Excel ， können Sie mit dem Rechtsklick-Menü eine Zeile über der aktiven Zeile auswählen. Wissen Sie jedoch, wie Sie leere Zeilen in jede Zeile einfügen, wie im folgenden Screenshot gezeigt? Hier stelle ich einige Tricks vor, um diesen Job schnell zu lösen.

Fügen Sie mit der Funktion "Sortieren" leere Zeilen zwischen die einzelnen Zeilen ein

Fügen Sie zwischen jeder Zeile leere Zeilen nach VBA-Code ein

Fügen Sie leere Zeilen / Spalten zwischen jede Zeile / Spalte von Kutools for Excel ein

---

Fügen Sie mit der Funktion "Sortieren" leere Zeilen zwischen die einzelnen Zeilen ein

Um leere Zeilen zwischen jede Zeile einzufügen, können Sie zuerst eine Reihe von Zahlen zweimal füllen und dann die Zahlen sortieren.

1. Geben Sie in die benachbarte Nummer eine Reihe von Nummern ein, die mit der Zeilennummer übereinstimmen.

2. Kopieren Sie die Seriennummern und fügen Sie sie in die Zelle nach der letzten Nummer ein.

2. Wählen Sie alle Seriennummern aus und klicken Sie auf Daten > Sortieren Sie vom kleinsten zum größten.

3. Im Knallen Warnung sortieren Dialog, halten Erweitern Sie die Auswahloption aktiviert, klicken Sie auf Sortieren.

Jetzt wurden die Leerzeichen zwischen die einzelnen Zeilen eingefügt. Sie können die Seriennummernspalte später entfernen.

---

Fügen Sie zwischen jeder Zeile leere Zeilen nach VBA-Code ein

Wenn Sie mit Makrocode vertraut sind, finden Sie hier auch einen Code, der Ihnen helfen kann.

1. Drücken Sie Alt + F11 zu aktivierende Tasten Microsoft Visual Basic für Applikationen Fenster.

2 Klicken Insert > ModulKopieren Sie dann den folgenden Code und fügen Sie ihn in das Modul ein.

VAB: Leerzeichen zwischen den Zeilen einfügens

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 F5 Mit der Taste zum Ausführen des Codes wird ein Dialogfeld angezeigt, das Sie daran erinnert, die Arbeitsdaten auszuwählen.

4 Klicken OK. Jetzt wurden die Leerzeichen zwischen ausgewählten Zeilen eingefügt.

---

Fügen Sie leere Zeilen / Spalten zwischen jede Zeile / Spalte von Kutools for Excel ein

Wenn Sie schnell und einfach leere Zeilen oder Spalten zwischen jede Zeile oder Spalte einfügen möchten, können Sie verwenden Kutools for Excel Insert Blank Rows & Columns Dienstprogramm, mit dem Sie das Intervall der Zeilen und die Anzahl der leeren Zeilen nach Bedarf angeben können.

Nach der Installation Kutools für Excel, bitte gehen Sie wie folgt vor:（Kutools für Excel jetzt kostenlos herunterladen!)

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

2. In dem Insert Blank Rows & Columns Dialog, überprüfen Blank rows or Blank columns nach Bedarf und geben Sie die Optionen von an Interval of und Rows.

3 Klicken Ok.

Zwischen jeder Zeile leere Zeilen einfügen	Fügen Sie zwischen jeder Spalte eine leere Spalte ein

Tipp: Dieses Dienstprogramm unterstützt das Rückgängigmachen Strg + Z.

  Fügen Sie leere Zeilen oder Spalten mit bestimmten Intervallen ein