2016年10月14日
exel中合并一列相同的数据到一行
摘要： Sub 按钮1_Click() Application.ScreenUpdating = False arr = Range("a1:c" & [a65536].End(xlUp).Row) [g1].CurrentRegion.ClearContents Cells(1, "g") = arr(1 阅读全文
posted @ 2016-10-14 18:21 qinqinyang 阅读(329) 评论(0) 推荐(0)