通过字典和数组进行分类汇总表格数据
摘要:Sub 分类汇总求和() Dim arr Sheets("分类汇总").Select Range("a2:h30000").ClearContents h = Sheets("汇总").Cells(65535, 1).End(xlUp).Row arr = Sheets("汇总").Range("a
阅读全文
posted @ 2022-07-03 12:21
posted @ 2022-07-03 12:21