Conas an spás idir gach ró a chur isteach in Excel go tapa?

In Excel ， is féidir leat an roghchlár cliceáil ar dheis a úsáid chun ró a roghnú os cionn a chéile gníomhach, ach an bhfuil a fhios agat conas sraitheanna bána a chur isteach i ngach ró mar a thaispeántar thíos an scáileán? Seo mé roinnt cleasanna ar an bpost seo a réiteach go tapa.

Cuir isteach sraitheanna bána idir gach ró de réir feidhm Sórtáil

Cuir isteach sraitheanna bána idir gach ró le cód VBA

Cuir isteach sraitheanna / colúin bhána idir gach ró / colún le Kutools le haghaidh Excel

---

Cuir isteach sraitheanna bána idir gach ró de réir feidhm Sórtáil

Chun sraitheanna bána a chur isteach idir gach ró, is féidir leat sraith uimhreacha a líonadh faoi dhó ar dtús, ansin na huimhreacha a shórtáil.

1. Sa uimhir in aice láimhe, líon sraith uimhreacha chun an tsraithuimhir a mheaitseáil.

2. Cóipeáil uimhreacha na sraithe, agus greamaigh iad sa chill tar éis na huimhreach deireanaí.

2. Roghnaigh uimhreacha na sraithe go léir, cliceáil Dáta > Sórtáil is lú go dtí an ceann is mó.

3. Sa popping Rabhadh Sórtáil dialóg, coinnigh Leathnaigh an rogha roghnaithe seiceáil, cliceáil Sórtáil.

Anois tá na spásanna curtha isteach idir gach ró. Is féidir leat colún uimhir na sraithe a bhaint níos déanaí.

---

Cuir isteach sraitheanna bána idir gach ró le cód VBA

Má tá tú eolach ar chód macra, seo cód a chabhróidh leat freisin.

1. Brúigh Alt + F11 eochracha le cumasú Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. cliceáil Ionsáigh > Modúil, ansin cóipeáil agus greamaigh thíos an cód leis an modúl.

VAB: Cuir isteach an spás idir an tsraiths

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. Brúigh F5 eochair chun an cód a rith, tagann dialóg amach le cur i gcuimhne duit na sonraí oibre a roghnú.

4. cliceáil OK. Anois tá na spásanna curtha isteach idir sraitheanna roghnaithe.

---

Cuir isteach sraitheanna / colúin bhána idir gach ró / colún le Kutools le haghaidh Excel

Más mian leat sraitheanna nó colúin bhána a chur isteach idir gach ró nó colún go tapa agus go héasca, is féidir leat iad a úsáid Kutools le haghaidh Excel'S Insert Blank Rows & Columns fóntais, ar féidir leat eatramh na sraitheanna agus líon na sraitheanna bán a shonrú de réir mar is gá duit.

Tar éis a shuiteáil Kutools for Excel, déan mar atá thíos le do thoil:Download Kutools Íoslódáil saor in aisce do Excel Anois!)

1. Roghnaigh an raon sonraí a theastaíonn uait sraitheanna nó colúin bhána a chur isteach, cliceáil Kutools > Insert > Insert Blank Rows & Columns.

2. Sa Insert Blank Rows & Columns dialóg, seiceáil Blank rows or Blank columns de réir mar is gá duit, agus sonraigh roghanna Interval of agus Rows.

3. cliceáil Ok.

Inert sraitheanna bán idir gach as a chéile	Cuir isteach colún bán idir gach colún

Leid: tacaíonn an fóntais seo le cealaigh Ctrl + Z..

  Cuir isteach sraitheanna nó colúin bhána le eatraimh shonracha