我需要计算某个短语在单个单元格中出现的次数。
单元格 B5 包含值“测试 123 测试 1234”
Sub count()
ival = Application.WorksheetFunction.CountIf(Range("B5"), "Test")
MsgBox ival
End Function
这将返回“0”，因为它不是完全匹配。我想要计算单元格中“测试”的次数并正确返回 2 作为值的东西。
最佳答案
结合Split和 Ubound
将字符串拆分为从零开始的一维子字符串数组，然后使用 ubound 找到该数组的上限
Sub count()
Dim count As Integer
count = UBound(Split(Range("B5"), "123"))
MsgBox count
End Sub
关于excel - 在单个单元格中查找多个短语计数，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/24307960/