新增JOIN,CHINARANK,COLORSUM等函数
时间:2023-01-27 10:55:30
大家不知道的是,我在微软内部工作,已经提前认识Excel2021版新增的几大函数。让我们拭目以待吧!
双向连接函数JOIN。
= JOIN(连接符,区域1,区域2,区域3 …)
![新增JOIN,CHINARANK,COLORSUM等函数](https://img.aspxhome.com/file/2023/0/a156960_0.png)
中国式排名函数CHINARANK,当有相同值时排名保持连续。= CHINARANK(值,区域)
![新增JOIN,CHINARANK,COLORSUM等函数](https://img.aspxhome.com/file/2023/0/a156960_1.png)
按颜色求和函数COLORSUM。
= COLORSUM(求和区域,颜色单元格)
![新增JOIN,CHINARANK,COLORSUM等函数](https://img.aspxhome.com/file/2023/0/a156960_2.png)
想要Excel2021版下载地址吗?就在文章结尾,你使劲往下翻,翻翻翻…
哈哈哈,别找啦!Excel2021是我杜撰出来的!
只是几个函数是真实存在的,用到了VBA的自定义函数功能,快捷工作表标签,单击查看代码,插入模块,把下面的代码复制进去。
![新增JOIN,CHINARANK,COLORSUM等函数](https://img.aspxhome.com/file/2023/0/a156960_3.gif)
公共函数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
结束功能
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
怎么解决0x0000003b物理内存导致蓝屏问题?
![](https://img.aspxhome.com/file/2023/30/a267380_0s.jpg)
win7系统中C:\\documents and settings文件夹解锁访问图文教程
![](https://img.aspxhome.com/file/2023/29/a254935_0s.jpg)
在word中把标题编辑漂亮的艺术字方法图解
![](https://img.aspxhome.com/file/2023/7/28757_0s.jpg)
Adobe Premiere Pro CS6如何恢复默认设置?Adobe Premiere Pro CS6恢复默认设置的操作步骤
![](https://img.aspxhome.com/file/2023/8/a332886_0s.jpg)
使用WPS Office的数学公式谱写音乐简谱
如何修改Mac文件默认打开方式?
![](https://img.aspxhome.com/file/2023/0/a209180_0s.jpeg)
Win11电脑电池图标丢失或变灰是怎么回事?
![](https://img.aspxhome.com/file/2023/1/a274399_0s.png)
Win10 21H1应用商店打不开怎么办?
![](https://img.aspxhome.com/file/2023/26/a222212_0s.png)
Word工具栏也能启动应用程序?
excel2003求和公式的使用教程
win10录屏显示不全的解决方法
![](https://img.aspxhome.com/file/2023/30/a268087_0s.jpg)
Heic格式怎样转换为png?嗨格式Heic图片转换器来帮你!
![](https://img.aspxhome.com/file/2023/7/a331118_0s.jpg)
Word 2007技巧:设置Word文档打印选项
![](https://img.aspxhome.com/file/2023/8/21638_0s.jpg)
重装系统后的简单优化设置方法介绍
![](https://img.aspxhome.com/file/2023/5/a318902_0s.jpg)
Win7休眠功能怎么关闭?
![](https://img.aspxhome.com/file/2023/27/a230619_0s.jpg)
IntelliJ IDEA完整使用教学:从小白到大神的必经路程
![](https://img.aspxhome.com/file/2023/6/a212126_0s.jpeg)
word文档中怎么正确编辑数学公式
Win10如何快速的开机?Win10快速开机的方法
![](https://img.aspxhome.com/file/2023/26/a220180_0s.png)
Apple ID 被盗用的 5 个征兆,遇到其中一种,建议赶快改密码
![](https://img.aspxhome.com/file/2023/6/a204736_0s.jpeg)
PowerPoint2010轻松2步即可快速插入公式
![](https://img.aspxhome.com/file/2023/10/a345231_0s.png)