用于计算字段中实体数量的宏

Question

我必须编写一个宏来显示另一列中一列中的实体数量。

假设excel中的一列具有记录a，b，c，d，e

我必须显示出现次数，即删除逗号并显示数字5 ..这是逻辑的基本，当然有更多的变化

这必须在VB中为excel中的宏完成..

非常感谢任何帮助..谢谢

Answer 1

听起来你需要拆分功能 - 检查The Versatile Split Function

中的“计数单词”示例

在这里修改为使用逗号

Function WordCount(txt) As Long
'   Returns the number of words in a string
    Dim x As Variant
    txt = Application.Trim(txt)
    x = Split(txt, ",")
    WordCount = UBound(x) + 1
End Function