如何在 Excel 中快速於每列之間插入空白列？

作者孫修改日期2024-09-26

在 Excel 中，您可以透過右鍵選單選取作用中儲存格上方的列，但您知道如何像下圖所示，在每一列之間插入空白列嗎？這裡為您介紹幾種快速完成這項操作的實用技巧。

透過排序功能在每列之間插入空白列

透過 Kutools for Excel 在每列／欄之間插入空白列／欄

透過 VBA 程式碼在每列之間插入空白列

透過排序功能在每列之間插入空白列

若要在每欄之間插入空白列，您可以先將一組數字序列填入兩次，再對這些數字進行排序。

1. 在相鄰欄位中，填入與列號對應的連續數字序列。
在相鄰欄位中填入數字序列

2. 複製該數字序列，並貼到最後一個數字後方的儲存格中。
將數字序列複製並貼到最後一個數字後方的儲存格中

2. 選取所有數字序列，點擊資料＞ 排序小到大。
點選「資料」>「由小到大排序」

3. 在跳出的排序警告對話方塊中，請確保擴充選取範圍選項維持勾選狀態，然後點擊排序。
保持勾選「擴充選取範圍」選項

現在已在每列之間插入空白列。稍後您可以刪除該數字序列欄。
已在每一列之間插入空白列

透過 Kutools for Excel 在每列／欄之間插入空白列／欄

想快速又輕鬆地在每列或每欄之間插入空白列或欄？立即使用 Kutools for Excel 的 Insert Blank Rows & Columns 功能，依需求指定列間隔與要插入的空白列數量，效率提升一步到位！

Kutools for Excel 提供超過 300 項進階功能，簡化複雜作業，提升創造力與效率。整合 AI 功能，Kutools 能精準自動化各項任務，讓資料管理輕鬆無負擔。Kutools for Excel 的詳細資訊…… 免費試用……

安裝 Kutools for Excel 後，請依照下列步驟操作：

1. 選取您要插入空白列或欄的數據區域，按一下 Kutools＞Insert＞Insert Blank Rows & Columns。
點選 Kutools 的「插入空白列與欄」功能

2. 在 Insert Blank Rows & Columns 對話方塊中，依需求勾選 Blank rows 或 Blank columns，並設定 Interval of 與 Rows 的選項。

3. 按一下確定。

在每列之間插入空白列	在每欄之間插入空白列

提示：此功能支援 Ctrl + Z 復原操作。

透過 VBA 程式碼在每列之間插入空白列

若您熟悉巨集程式碼，以下這段程式碼也能助您達成目標。

1. 按下 Alt + F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗！

2. 按一下插入＞模組，然後將下方程式碼複製並貼上至模組中。

VBA：在列之間插入空白

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. 按下 F5 鍵執行程式碼後，將跳出對話方塊，提醒您選取要處理的資料。
用於選取資料範圍的 VBA 程式碼

4. 按一下確定，即可在所選列之間插入空白。
已在所選列之間插入空白列

示範：以特定間隔插入空白列或欄

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多