没有合适的资源?快使用搜索试试~ 我知道了~
第28集 VBA字典二 123、 提取不重复的值 Sub 提取不重复的产品() Dim d As New Dictionary Dim arr, x arr = Range(“a2:a12”) For x = 1 To UBound(arr) d(arr(x, 1)) = “” ‘利用字典key列不重复特点,装入不重复的key值,item列全设置为空 Next x Range(“c2”).Resize(d.Count) = Application.Transpose(d.Keys) End Sub 124、 多行2列分类汇总 Sub 汇总() Dim d As New Dictionar
资源推荐
资源评论
资源评论
weixin_38565628
- 粉丝: 2
- 资源: 902
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功