新增JOIN，CHINARANK，COLORSUM等函数 _知识经验

大家不知道的是，我在微软内部工作，已经提前认识Excel2021版新增的几大函数。让我们拭目以待吧!
双向连接函数JOIN 。
= JOIN(连接符，区域1，区域2，区域3 …)

文章插图

中国式排名函数CHINARANK，当有相同值时排名保持连续。= CHINARANK(值，区域)

文章插图

按颜色求和函数COLORSUM 。
= COLORSUM(求和区域，颜色单元格)
【新增JOIN，CHINARANK，COLORSUM等函数】

文章插图

想要Excel2021版下载地址吗?就在文章结尾，你使劲往下翻，翻翻翻…
哈哈哈，别找啦!Excel2021是我杜撰出来的!
只是几个函数是真实存在的，用到了VBA的自定义函数功能，快捷工作表标签，单击查看代码，插入模块，把下面的代码复制进去。

文章插图

公共函数JOIN(ll，ParamArray x())
对于每个r x
如果IsArray(r)然后
对于每个rr In r
如果rr <>“”则JOIN = JOIN&ll&rr
下一个
其他
JOIN = JOIN&ll&r
万一
下一个
JOIN = Mid $(JOIN，2，Len(JOIN))
结束功能
函数ChinaRank(V，Rng)
昏暗x一样长，k一样长
昏暗的arr，arr1
arr = Rng
设置d = CreateObject(“ scripting.dictionary”)
对于x = 1到UBound(arr)
d(arr(x，1))=“”
下一个x
arr1 = d 。键
对于x1 = 0到UBound(arr1)
如果arr1(x1)> V那么k = k + 1
下一个x1
中国排名= k + 1
结束功能
函数COLORSUM(Rg1作为范围，Rg2作为范围)
昏暗rg_ID为范围，rg_sum为长
对于Rg1中的每个rg_ID
如果rg_ID.Interior.ColorIndex = Rg2.Interior.ColorIndex然后
rg_sum = rg_sum + IIf(IsNumeric(rg_ID.Value)，rg_ID.Value，0)
万一
下一个
COLORSUM = rg_sum
结束功能