2020年9月9日
数组字典
摘要： 一、实现计数求和功能 详情代码如下： Sub 多列汇总() Dim arr, brr, dic Dim i&, j&, k& arr = Range("a1:c" & Range("a" & Rows.Count).End(xlUp).Row) ReDim brr(1 To UBound(arr, 阅读全文
posted @ 2020-09-09 23:15 大黑山 阅读(424) 评论(0) 推荐(0)