在excel中如何把奇数偶数行弄成不同的颜色，谢谢了！

2024-12-03 09:53:50

推荐回答（3个）

回答1：

ctrl+A
全选工作表。
菜单，格式，条件格式，公式
=mod(row(),2)=0
定义格式中的图案颜色红色
再添加一个条件
公式为
=mod(row(),2)=1
定义图案颜色黄色
确定
这样，就是红色和黄色相间

回答2：

Sub
PrintOddPage()
Dim
TotalPg
As
Integer
TotalPg
=
ExecuteExcel4Macro("GET.DOCUMENT(50)")
For
i
=
1
To
TotalPg
Step
2
ActiveSheet.PrintOut
From:=i,
To:=i
Next
End
Sub
这个是宏。。是打印奇数页的。。。把For
i
=
1
To
TotalPg
Step
2改为For
i
=
2
To
TotalPg
Step
2就变为打印偶数页了。。。

回答3：

全选-格式-条件格式-公式
=mod(row(),2)
设成一个颜色
=mod(row(),2)-1
设成一个颜色