excel2010中如何查询一列数据中相同数值之间隔了几行.同一数值出现三次以上.例如:A B 111 222 333 111 2 121 122 123 111 3 222 6 121 4
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/03 22:14:37
![excel2010中如何查询一列数据中相同数值之间隔了几行.同一数值出现三次以上.例如:A B 111 222 333 111 2 121 122 123 111 3 222 6 121 4](/uploads/image/z/10157347-19-7.jpg?t=excel2010%E4%B8%AD%E5%A6%82%E4%BD%95%E6%9F%A5%E8%AF%A2%E4%B8%80%E5%88%97%E6%95%B0%E6%8D%AE%E4%B8%AD%E7%9B%B8%E5%90%8C%E6%95%B0%E5%80%BC%E4%B9%8B%E9%97%B4%E9%9A%94%E4%BA%86%E5%87%A0%E8%A1%8C.%E5%90%8C%E4%B8%80%E6%95%B0%E5%80%BC%E5%87%BA%E7%8E%B0%E4%B8%89%E6%AC%A1%E4%BB%A5%E4%B8%8A.%E4%BE%8B%E5%A6%82%EF%BC%9AA+++++++B++++++++111++++++++222++++++++333++++++++111+++++2++++++++121++++++++122++++++++123++++++++111++++3++++++++222++++6++++++++121++++4)
excel2010中如何查询一列数据中相同数值之间隔了几行.同一数值出现三次以上.例如:A B 111 222 333 111 2 121 122 123 111 3 222 6 121 4
excel2010中如何查询一列数据中相同数值之间隔了几行.同一数值出现三次以上.
例如:A B
111
222
333
111 2
121
122
123
111 3
222 6
121 4
333 7
111 3
122 6
想要像B列一样的结果,想知道是否可以实现?有十几万条数据.
excel2010中如何查询一列数据中相同数值之间隔了几行.同一数值出现三次以上.例如:A B 111 222 333 111 2 121 122 123 111 3 222 6 121 4
你的题目 有点问题.是同一数值出2次以上还是3次以上.如果是3次,那么你的122才出现2次呢?
ALT+F11——F7——粘贴如下代码(注意换行)——F5运行即可
Sub mysub()
Dim i As Long, j As Long, a As Long
a = [a65536].End(xlUp).Row
For i = a To 2 Step -1
If Application.WorksheetFunction.CountIf(Range("a:a"), Range("a" & i)) > 1 Then
For j = i - 1 To 1 Step -1
If Range("a" & j) = Range("a" & i) Then
Range("b" & i) = i - j - 1
GoTo label1
End If
Next j
End If
label1: Next i
End Sub
这个是不换行即 可的代码.
Sub mysub()
Dim i As Long,j As Long,a As Long
a = [a65536].End(xlUp).Row
For i = a To 2 Step -1
If Application.WorksheetFunction.CountIf(Range("a:a"),Range("a" & i)) > 1 Then
For j = i - 1 To 1 Step -1
If Range("a" & j) = Range("a" & i) Then
Range("b" & i) = i - j - 1
GoTo label1
End If
Next j
End If
label1:Next i
End Sub