条件格式里再运算，不要添加辅助列。

secowu · 发表于 2011-1-10 09:16

要求：
1、不添加辅助列
2、使用条件格式
目的：
标出G列为奇数的行，并整行的颜色涂红
测试这个不成功

=$G1=MOD($G1,2)=1

复制代码

1 2 3 4 5 6 7
2 3 4 5 6 7 8
3 4 5 6 7 8 9
4 5 6 7 8 9 10
5 6 7 8 9 10 11
6 7 8 9 10 11 12
7 8 9 10 11 12 13
8 9 10 11 12 13 14
9 10 11 12 13 14 15
10 11 12 13 14 15 16
11 12 13 14 15 16 17
12 13 14 15 16 17 18
13 14 15 16 17 18 19
14 15 16 17 18 19 20
15 16 17 18 19 20 21
16 17 18 19 20 21 22
17 18 19 20 21 22 23
18 19 20 21 22 23 24
19 20 21 22 23 24 25
20 21 22 23 24 25 26
21 22 23 24 25 26 27

secowu · 发表于 2011-1-10 09:39

vba倒是简单

Sub cit()
Dim i
For i = 1 To Sheet1.Cells(Rows.Count, 1).End(3).Row
If Sheet1.Range("G" & i) Mod 2 = 1 Then
Sheet1.Rows(i).Font.Color = vbRed
End If
Next i
End Sub

复制代码

		自动登录	找回密码
密码			免费注册

[求助] 条件格式里再运算，不要添加辅助列。