在excel中怎么统计最大间隔数?

2025-04-01 16:17:43
推荐回答(3个)
回答1:

用公式可能不行,用VBA代码吧。打开VBA窗口,插入一个模块,把下面代码复制过去,执行即可。
数据放在A列,从A2开始。
Sub dd()
Dim s(1 To 10) As Integer '定义数组最大为10(可根据数据多少修改)
Dim max As Integer
t = 5 '需要求间隔的数
For i = 2 To 11
If Cells(i, 1) = t Then w = i: Exit For '找出第一次出现的行号
Next
For j = i To 10
If Cells(j, 1) = t Then n = n + 1: s(n) = j - w - 1: w = j '将每一间隔放入数组
Next
For i = 1 To 10
If max < s(i) Then max = s(i) '排序求最大间隔
Next
MsgBox "最大间隔是:" & max
End Sub

回答2:

{=MAX(FREQUENCY(IF($A$1:$A$30<>5,$A$1:$A$30),IF($A$1:$A$30<>5,ROW($A$1:$A$30))))}
呵呵,好像我搞错啦,应该是2L的~~

回答3:

=MAX(FREQUENCY(IF(A2:A11<>5,ROW(A2:A11)),IF(A2:A11=5,ROW(A2:A11))))
数组公式,按Ctrl+Shift+Enter结束公式输入。