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.
Kutools pentru Excel, cu mai mult de 300 funcții la îndemână, vă face munca mai ușoară. |
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
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!