【Excel每隔一行插入一空白行的快捷方法】在使用 Excel 处理数据时，有时需要在每一行之间插入一个空白行，以便于数据分隔或后续处理。手动逐行插入既费时又容易出错，因此掌握一种快捷的方法非常有必要。
以下是一些高效且实用的方法，帮助你在 Excel 中快速实现“每隔一行插入一空白行”的操作。
一、方法总结
| 方法 | 操作步骤 | 适用场景 | 优点 |
| 使用公式 + 复制粘贴 | 在辅助列输入公式，生成新数据后复制粘贴为值 | 数据量适中，需要保留原始数据 | 简单易懂，适合初学者 |
| 使用 VBA 宏 | 编写简单的宏代码自动完成插入操作 | 需要频繁操作或数据量大 | 自动化程度高，节省时间 |
| 使用 Power Query | 通过添加索引列并筛选奇数/偶数行实现 | 数据清洗或批量处理 | 可自动化处理多个文件 |
二、详细操作说明
1. 使用公式 + 复制粘贴（推荐）
步骤如下：
1. 假设你的数据在 A 列，从 A1 开始。
2. 在 B1 输入公式：`=IF(MOD(ROW(),2)=1,A1,"")`
3. 向下拖动填充至所有数据行。
4. 选中 B 列的数据，复制并选择性粘贴为“值”。
5. 将 B 列的数据复制到 A 列下方，即可实现每隔一行插入空白行。
> 注意：此方法会将原数据保留，并在每行后插入空行，适用于需要保留原始数据的情况。
2. 使用 VBA 宏（适合高级用户）
步骤如下：
1. 按 `Alt + F11` 打开 VBA 编辑器。
2. 插入 -> 模块，粘贴以下代码：
```vba
Sub InsertBlankRow()
Dim i As Long
For i = Cells(Rows.Count, "A").End(xlUp).Row To 1 Step -1
Rows(i).Insert Shift:=xlDown
Next i
End Sub
```
3. 关闭编辑器，返回 Excel，按 `Alt + F8` 运行宏。
> 说明：该宏会从最后一行开始向上插入空白行，确保不覆盖原有数据。
3. 使用 Power Query（适合数据处理）
步骤如下：
1. 选中数据区域，点击“数据”选项卡中的“从表格/区域”。
2. 在 Power Query 编辑器中，添加“索引列”。
3. 筛选索引列为偶数的行，删除这些行。
4. 返回 Excel，导出数据即可。
> 说明：此方法适合对数据进行结构化处理，尤其适合需要重复操作的场景。
三、总结
在 Excel 中每隔一行插入空白行，可以通过多种方式实现，包括使用公式、VBA 宏或 Power Query。根据实际需求和数据量选择合适的方法，可以显著提高工作效率，减少重复劳动。
如果你是日常办公人员，推荐使用公式法；如果是数据分析师，Power Query 是更强大的工具；而 VBA 宏则适合需要频繁执行相同任务的用户。
