时间戳

首页 > 解决方案 > 我想对对 VBA 进行循环检查

excel - 我想对对 VBA 进行循环检查

问题描述

我有一个项目涉及检查列中的对。我是初学者，所以我尝试了

If a = b Then
    Par = Par + 1
End If
If a = c Then
    Par = Par + 1
End If
If a = d Then
    Par = Par + 1
End If

等等等等，但如果我想让它工作，我将不得不重复这个代码36次......

有一个简单的循环吗？

标签： excelvba

解决方案

这是一种可能满足您需求的简单方法。

想象一个简单的范围内的表A1:B5

   A   B
1  aa  aa
2  cc  bb
3  ee  cc
4  gg  dd
5  hh  ee

这里我们有三对aa & aa, cc & cc, ee & ee。

此公式将计算对数：

=SUMPRODUCT(COUNTIF(A1:A5,B1:B5)) // = 3

推荐阅读