[已解决]如何利用函数判断区域中连号的个数？

jjxuexizy

如何利用函数判断区域中连号的个数？   万分感谢

最佳答案

月排行榜 / 总排行榜

baksy

2015-4-28 11:21

附件.

跳转到最佳答案楼层

jjxuexizy

请求高手及时回复，谢谢

baksy

附件.

橘子红

1. =SUM(TEXT(FREQUENCY(IF(A2:F2+1=B2:G2,COLUMN(A:F)),IF(A2:F2+1-B2:G2,COLUMN(A:F))),"0;;\-1")+1)

复制代码

三键结束

Excel学徒123

VBA接受吗？函数确实整不动了，或者自定义函数

Excel学徒123

1. Public Function GetNum(rg As Range) As Integer
   
2.     Dim rng As Range
   
3.     Dim n, Iar As Integer, k As Integer
   
4.     Dim arr(1 To 1000)
   
5.     For Each rng In rg
   
6.         k = k + 1
   
7.         If rng = rng.Offset(0, 1) - 1 Then
   
8.             arr(k) = rng
   
9.             arr(k + 1) = rng.Offset(0, 1)
   
10.         End If
    
11.     Next
    
12.     For Iar = 1 To UBound(arr)
    
13.         If arr(Iar) <> "" Then
    
14.             n = n + 1
    
15.         End If
    
16.     Next
    
17.     GetNum = n
    
18. End Function
    

复制代码

下载附件吧

蝶·舞

存不存在虽然数据连号，但单元格位置不连续的可能？

象山海鲜

1. =SUMPRODUCT(TEXT(FREQUENCY(ROW($1:$6),(B2:F2-A2:E2<>1)*COLUMN(A:F))-1,"0;-1;-1")+1)

复制代码

减一个

1. =SUMPRODUCT(1-TEXT(FREQUENCY(ROW($1:$6),(B2:F2-A2:E2<>1)*COLUMN(A:F))-1,"-0;1;1"))

复制代码

baksy

附件