B2 =IF(A2=A1,B1+1,0)
这样计算的结果 就是如果有连续出现重复的数字 ，是第几次重复出现 就显示几……
比如有连续出现的三个相同数字的话，第一个是0、 第二个是1、第三个是2（重复的次数）追问
这样计算的结果 就是如果有连续出现重复的数字 ，是第几次重复出现 就显示几……
比如有连续出现的三个相同数字的话，第一个是0、 第二个是1、第三个是2（重复的次数）追问
第三个能否不要累计 也是显示1
追答如果是需要这样的话 就修改一下公式：
B2 =IF(A2=A1,1,0)
温馨提示：答案为网友推荐，仅供参考
第1个回答 2013-07-06
B1=IF(A1="","",IF(A1=A2,1,0))并向下填充。
第2个回答 2013-07-06
used in module
使用自定义函数
Function acount()
Dim rng As Range, rg As Range
Dim d As Object
Set rng = Range("a1:b12") ‘范围可以自己选择
Set d = CreateObject("scripting.dictionary")
For Each rg In rng
If rg.Value <> "" Then
d(rg.Value) = ""
End If
Next
acount = d.Count
End Function
in worksheets
=acount()
使用自定义函数
Function acount()
Dim rng As Range, rg As Range
Dim d As Object
Set rng = Range("a1:b12") ‘范围可以自己选择
Set d = CreateObject("scripting.dictionary")
For Each rg In rng
If rg.Value <> "" Then
d(rg.Value) = ""
End If
Next
acount = d.Count
End Function
in worksheets
=acount()
第3个回答 2013-07-06
在B2内输入“=if(A2=A1,B1+1,0)"，向下填充即可。
第4个回答 2013-07-06
在B2中输入 =IF(ISNA(VLOOKUP(A2,$A$1:A1,1,0)),0,1)追问
公式无法匹配
追答
你是在上面的表的B2中输入吗？
相似回答