Question

Excel需要俩条公式：找到 连续偶数次数＞4次的位置并且，同样连续奇数＞4次的位置也需要

你好 4次以上会有好几组，能自动加个颜色 显示出来最好了
本人不懂excel 如果代码可以的 希望能发我 我复制能用就行

Answer 1

自A4开始应用条件格式，新建规则，使用公式确定...，定义格式，规则说明内填写=and(iseven(A1),iseven(A2),iseven(A3),iseven(A4))；

再同法定义奇数的规则，把上式中的iseven改为isodd，其它不变。

Answer 2

嗯，这种事用代码似乎更容易处理。
Sub selectfor()
Dim eVEN, oDD
eVEN = 0
oDDm = 0
X = 0
For i = 1 To Sheet1.Range("a65536").End(xlUp).Row
If Sheet1.Cells(i, 1) = X Then
If (X Mod 2) = 0 Then
eVEN = eVEN + 1
Else
oDD = oDD + 1
End If
Else
X = Sheet1.Cells(i, 1)
If eVEN >= 4 Then
Sheet1.Range("A" & i - eVEN & ":A" & i - 1).Select
With Selection.Interior
.Color = 5296274
End With
End If
If oDD >= 4 Then
Sheet1.Range("A" & i - oDD & ":A" & i - 1).Select
With Selection.Interior
.Color = 65535
End With
End If
If (X Mod 2) = 0 Then
eVEN = 1
oDD = 0
Else
eVEN = 0
oDD = 1
End If
End If
Next i
End Sub

Answer 3

相劝用代码!!!

Answer 4

写代码可以实现

Answer 5

步骤如下:

1. 选择A列>>点击菜单栏的开始>>条件格式>>新建规则>>使用公式确定要设置格式的单元格>>在下方的编辑框中输入公式:=AND(A1<>"",OR(SUMPRODUCT(MOD(OFFSET(A1,-3,,4,),2))=0,SUMPRODUCT(MOD(OFFSET(A1,-2,,4,),2))=0,SUMPRODUCT(MOD(OFFSET(A1,-1,,4,),2))=0,SUMPRODUCT(MOD(OFFSET(A1,,,4,),2))=0))

2. 点击下方的格式按钮>>填充选项卡>>选择你喜欢的颜色>>确定退出

3. 同理设置奇数,把上式中的=0改成=1即可.