用Vba计算同列两个相邻单元格数值相同的下一个单元格的个数

来源：学生作业帮助网编辑：六六作业网时间：2025/02/07 09:37:41

用Vba计算同列两个相邻单元格数值相同的下一个单元格的个数用Vba计算同列两个相邻单元格数值相同的下一个单元格的个数用Vba计算同列两个相邻单元格数值相同的下一个单元格的个数PrivateSubCom

用Vba计算同列两个相邻单元格数值相同的下一个单元格的个数
用Vba计算同列两个相邻单元格数值相同的下一个单元格的个数

用Vba计算同列两个相邻单元格数值相同的下一个单元格的个数
Private Sub CommandButton1_Click()
Dim i,j As Integer
j = 0
For i = 1 To [a65536].End(xlUp).Row
If Range("a" & i) = Range("a" & i + 1) Then
j = j + 1
End If
Next
End Sub
这个是A列从第一个单元格到最后一个单元格
相邻单元格相等的个数.