parsing - 计算字段中实体数量的宏

Question

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

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

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

对于excel中的宏，这必须在VB中完成。

将不胜感激任何帮助..谢谢

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