如何把一列中三个不同的文本个数计数在一起,用VBA自定义函数能解决吗?

来源：学生作业帮编辑：神马作文网作业帮分类：综合作业时间：2024/11/12 16:57:01

你应该更详细一点的描述你的问题.
统计个数之类的都不是很困难,只是不知道你到底是计什么数!
再问：比如：一列中有3个a,4个b,2个c，但每列都不一样，需要一个公式，将每列中abc总的个数统计出来。谢谢！
再答： Function strNum(ByVal Rng As Range, ParamArray arr() As Variant) As String
    'Rng用来确定区域,arr参数数组用来确定要统计的内容
    '本函数可以在指定区域，统计指定内容的数据个数

    Dim r As Range
    Dim dc As Object
    Set dc = CreateObject("Scripting.Dictionary")

    For Each r In Rng
        dc(r.Value) = Val(dc(r.Value)) + 1
    Next

    Dim i As Integer
    For i = 0 To UBound(arr)
        If Not dc.exists(arr(i)) Then dc(arr(i)) = 0
        If strNum = "" Then
            strNum = arr(i) & ":" & dc(arr(i))
        Else
            strNum = strNum & "  " & arr(i) & ":" & dc(arr(i))
        End If
    Next
End Function具体用法参见附件！！

如何把一列中三个不同的文本个数计数在一起,用VBA自定义函数能解决吗? VBA 自定义函数问题如何利用excel中vba自定义函数产生一组指定区间波动的随机数,有合格率限制如何用vba在excel中自定义一个函数 Excel中如何统计个数的函数,统计某一区域内不同内容的个数比如有一列数据为帮我转成vba自定义函数在EXCEL中,如何同时求多组数据的百分位数?打算用VBA实现,在VBA中求一组数据的百分位数的函数是什么? excel中如何统计一列中不同数据的个数呢 mathematica能绘制自定义函数曲线吗? 如何把excel表中一列数都减同一个数. matlab中自定义函数 matlab 中自定义函数