VBA CountIf() 循环 / Countifs() 循环

【问题标题】：VBA CountIf() loop / Countifs() loopVBA CountIf() 循环 / Countifs() 循环
【发布时间】：2017-06-19 00:50:56
【问题描述】：

我是 VBA 新手，使用 VBA Recorder 逆向工程 VBA 取得了一些成功。但是，我在为整个列或单个列的动态范围（使用 .end(xldown) / .end(xlup)）中包含值“TT”的所有单元格创建 CountIfs() 循环时遇到问题

我会发布我的代码，但老实说，我已经为这个问题找到了很多不同的“答案”，以至于我还无法根据我的用例进行建模，而且我认为我与任何个人方法都不太接近。（最终我需要将其扩展为基于其他列值的 CountIfS() ，但一次一步）...

谢谢！！

【问题讨论】：

【解决方案1】：

这个简单的代码怎么样---

Sub vbaCountIF()
    Dim Rslt
    Rslt = WorksheetFunction.CountIfs(Range("A:A"), "TT")
    MsgBox Rslt
End Sub

【讨论】：

对other column values 使用循环并将它们作为条件传递以代替"TT"
甜！有用。我可能从一开始就想多了。如果我想添加其他条件，countifs 语法是什么？
@ReedTurgeon 如果它适合你，你应该接受答案（勾选为绿色）。如需更多标准，您必须添加 Range 和 Criteria，例如 Rslt = WorksheetFunction.CountIfs(Range("A:A"), "TT", Range("B:B"), "Hello")
感谢有关扩展的 CountIfs() 的信息，我不知道绿色箭头交易！