导读：在Excel中，有时需要将单双行分开来操作，例如给单行添加背景色或者删除双行等。本文将介绍三种方法帮助您实现将奇偶行分离的需求。
方法一：条件格式
步骤一：选择单双行
首先，您需要将需要处理的数据选择出来，可以通过Ctrl+左键进行选择。
步骤二：新建条件格式
接着，在条件格式中选择“新建规则”。
步骤三：设置条件格式
在新建格式规则窗口中，选择“使用公式确定要设置格式的单元格”，并输入以下公式：
=MOD(ROW(),2)=0
上述公式中， MOD(ROW(),2) 可以判断每一行是奇数行还是偶数行， 如果是奇数行返回 1，否则返回 0。而 =0 表示偶数行，可以用来对偶数行设置背景色等样式。
方法二：数组公式
步骤一：复制数据
将需要处理的数据复制到一个新的区域，例如：复制到 B 列。
步骤二：输入公式
在 C 列中输入以下公式（该公式为数组公式，需要使用Ctrl+Shift+Enter组合键进行输入）：
=INDEX($B:$B,N(IF(1,AGGREGATE(15,6,(ROW($B:$B)-ROW($B$1)+1)/2,ROW($B:$B))))+({0;0;1}-1)*ROW()
输入完公式后会自动将结果分离为单双数列。
方法三：VBA编程
步骤一：打开 VBA 编辑器
首先，需要打开 VBA 编辑器，可以通过按下 Alt + F11 组合键进行打开。
步骤二：输入 VBA 代码
在 VBA 编辑器中，将以下代码输入进去：
``` vba
'分离奇偶行
Sub SeparateRows()
Dim rngCopy As Range
Dim rngPasteOdd As Range
Dim rngPasteEven As Range
Set rngCopy = Application.Selection
Set rngPasteOdd = Application.InputBox("请先点击【确定】，然后选择单数列的第一个记录单元格", "选择单数列的首个单元格", Type:=8)
Set rngPasteEven = Application.InputBox("请先点击【确定】，然后选择双数列的第一个记录单元格", "选择双数列的首个单元格", Type:=8)
rngCopy.Copy rngPasteOdd
Dim i As Integer
i = 1
For Each rgxRow In rngCopy.Rows
If i Mod 2 = 0 Then
rgxRow.Copy rngPasteEven
Set rngPasteEven = rngPasteEven.Offset(1, 0)
Else
rgxRow.Copy rngPasteOdd
Set rngPasteOdd = rngPasteOdd.Offset(1, 0)
End If
i = i + 1
Next rgxRow
Application.CutCopyMode = False
End Sub
```
步骤三：使用 VBA 程序
在完成 VBA 代码输入后，按 F5 运行该程序即可分离奇偶行。
总结
本文介绍了三种方法帮助您实现将奇偶行分离的需求。使用条件格式时可以方便地编辑样式，使用数组公式可以将结果直接分离为单双数列，通过 VBA 编程的方式既方便又可定制化。您可以根据自己的需求选择适合自己的方法。
