如何在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对话框中，请选择要插入空白行的区域，然后点击确定按钮。参见截图：

然后每隔两行就会插入一个新的空白行。参见截图：

相关文章

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