Cum se introduce rapid spațiu între fiecare rând în Excel?

În Excel ， puteți utiliza meniul cu clic dreapta pentru a selecta un rând deasupra rândului activ, dar știți cum să inserați rânduri goale în fiecare rând așa cum este prezentat mai jos? Aici introduc câteva trucuri pentru rezolvarea rapidă a acestui job.

Introduceți rânduri goale între fiecare rând după funcția Sortare

Introduceți rânduri goale între fiecare rând după codul VBA

Introduceți rânduri / coloane goale între fiecare rând / coloană de către Kutools pentru Excel

---

Introduceți rânduri goale între fiecare rând după funcția Sortare

Pentru a insera rânduri goale între fiecare rând, puteți completa mai întâi o serie de numere de două ori, apoi sortați numerele.

1. În numărul adiacent, completați o serie de numere pentru a se potrivi cu numărul rândului.

2. Copiați numerele seriei și lipiți-le în celulă după ultimul număr.

2. Selectați toate numerele seriei, faceți clic pe Date > Sortați de la cel mai mic la cel mai mare.

3. În popping Avertizare Sortare dialog, păstrează Extindeți opțiunea de selecție bifat, faceți clic Sortează.

Acum spațiile au fost inserate între fiecare rând. Puteți elimina coloana numărului de serie mai târziu.

---

Introduceți rânduri goale între fiecare rând după codul VBA

Dacă sunteți familiarizat cu codul macro, iată un cod care vă poate ajuta.

1. presa Alt + F11 taste pentru activare Microsoft Visual Basic pentru aplicații fereastră.

2. clic Insera > Module, apoi copiați și lipiți codul de mai jos în modul.

VAB: introduceți spațiu între rânds

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. presa F5 pentru a rula codul, apare o fereastră de dialog pentru a vă reaminti să selectați datele de lucru.

4. clic OK. Acum spațiile au fost inserate între rândurile selectate.

---

Introduceți rânduri / coloane goale între fiecare rând / coloană de către Kutools pentru Excel

Dacă doriți să inserați rânduri sau coloane goale între fiecare rând sau coloană rapid și ușor, puteți utiliza Kutools pentru Excel'S Insert Blank Rows & Columns utilitar, pe care îl puteți specifica intervalul de rânduri și numărul de rânduri goale după cum aveți nevoie.

După instalare Kutools pentru Excel, faceți următoarele:（Descărcați gratuit Kutools pentru Excel acum!)

1. Selectați intervalul de date pe care doriți să introduceți rânduri sau coloane goale, faceți clic pe Kutools > Insert > Insert Blank Rows & Columns.

2. În Insert Blank Rows & Columns dialog, verificați Blank rows or Blank columns după cum aveți nevoie și specificați opțiunile Interval of și Rows.

3. clic Ok.

Rânduri inerte goale între fiecare rând	Introduceți o coloană goală între fiecare coloană

varful: acest utilitar acceptă anularea Ctrl + Z.

  Introduceți rânduri sau coloane goale cu intervale specifice