如何在 Excel 中快速插入空白行？

我們大多數人在使用 Excel 時，可能都會遇到需要在現有的每一行之間插入空白行的情況。雖然我們都知道如何手動插入空白行，但如果逐一插入數百個空白行，將會是一個非常繁瑣的任務。以下是一些快速解決此問題的小技巧。

使用排序功能插入空白行
使用 Kutools for Excel 快速插入指定數量的空白行
使用 VBA 程式碼插入交替的空白行

使用排序功能插入空白行

這個方法比較簡單但有些迂迴，可以按照以下步驟操作：

1. 你需要一個與數據相鄰的空白列。例如，如果你的工作表範圍是 A1:E9，你可以使用 F 列。

2. 在單元格 F1 輸入數字 1，在單元格 F2 輸入數字 2。

3. 選擇數字 1 和數字 2，然後雙擊填充柄，Excel 將自動填充 F 列中的單元格。

4. 接著複製新生成的 F 列（F1:F9），選擇單元格 F10，並將自動填充的數字從 F1:F9 粘貼過來。請參見截圖：

5. 然後點擊 數據 > 排序，此時會彈出一個 排序警告 對話框，選擇 擴展選定區域 選項，並點擊 排序… 請參見截圖：

6. 此時會出現一個 排序 對話框，從 排序方式 下拉列表中選擇數字 1 ，然後點擊 確定 按鈕。請參見截圖：

這樣新的空白行就已經插入到現有行之間了。請參見截圖：

備註：如果你想在每行之間插入兩行或三行空白行，可以將新生成的自動填充列複製兩次或三次以添加新行。

使用 Kutools for Excel 快速插入指定數量的空白行

上述兩種方法僅適用於在每一行之間插入空白行。如果要在每隔 n 行之後插入一行或多行空白行，該怎麼辦呢？在此我推薦使用 Kutools for Excel 的 插入空白行和列 工具。這個工具可以幫助你快速在每隔 n 行之後插入指定數量的空白行到某個特定區域。請按照以下步驟操作：

1. 選擇要插入空白行的範圍，然後點擊 Kutools > 插入 > 插入空白行和列。請參見截圖：

2. 在 插入空白行和列 對話框中，選擇 插入類型 區域中的 空白行，指定每隔幾行插入空白行以及要插入的行數，然後點擊 確定 按鈕。請參見截圖：

>

這樣就可以看到每隔兩行插入了指定數量的空白行。請參見截圖：

備註：間隔 和 行 的數字可以根據需要進行調整。例如，你可以在每隔一、二、三…行之後插入三、四、五…個空白行。

使用 VBA 程式碼插入交替的空白行

如果上述方法有些複雜，你可以使用以下 VBA 程式碼來解決。

1. 按下 Alt + F11 鍵打開 Microsoft Visual Basic for Applications 窗口，然後點擊 插入 > 模組，並將以下程式碼輸入模組中：

VBA 程式碼：在 Excel 中插入空白行

Sub InsertBlackRows()
'Updateby20131127
Dim Rng As Range
Dim WorkRng As Range
Dim FirstRow As Integer, xRows As Integer, xCols As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
FirstRow = WorkRng.Row
xRows = WorkRng.Rows.Count
xCols = WorkRng.Columns.Count
Application.ScreenUpdating = False
WorkRng.Cells(xRows, 1).Resize(1, xCols).Select
Do Until Selection.Row = FirstRow
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    Selection.Offset(-1, 0).Select
Loop
Application.ScreenUpdating = True
End Sub

2. 然後點擊 按鈕或按下 F5 鍵運行程式碼。在彈出的 Kutools for Excel 對話框中，請選擇要插入空白行的範圍，然後點擊 確定 按鈕。請參見截圖：

這樣就在每隔兩行之間插入了一個新的空白行。請參見截圖：

相關文章

• 快速每隔一列插入空白列
• 一次性插入多個空白行或列