VBA实现不同条件的单元格内容合并同类项拼接

theron0376

1、相同大组编号和小组号，确认工程名称的拼接。只有一个不拼接，如果有多个工程名称一致不拼接，如果不一致，中间用；分离。
2、工程名称可能会出现重复，只显示一个工程名称参与拼接即可

今铭昔

zpy2

select * from 单元格内容合并同类项拼接 join (select 大组编号,小组号, group_concat(distinct(工程名称)) 效果 from 单元格内容合并同类项拼接 group by 大组编号,小组号) using(大组编号,小组号)

LIUZHU

今铭昔 发表于 2023-7-29 10:30

好好参研下铭佬的代码

LIUZHU

今铭昔 发表于 2023-7-29 10:30

铭佬，这句如何理解arr.map(fn, {})？

LIUZHU

今铭昔 发表于 2023-7-29 10:30

arr.map(fn, {})，map的参数可以这么用吗？

LIUZHU

这个写法有点看着习惯，一般会这样写：
let brr=arr.map(v=>{函数内容}, {})
sheet.Range("E2").Resize(arr.length, 1).Value2=brr
这样分开写，似乎看得更清晰些，不过倒是学习了map的第二参数的用法

LIUZHU

学习了下铭佬的代码，然后自己写了一个

LIUZHU

今铭昔 发表于 2023-7-29 10:30

铭佬请教一个代码书写分隔的问题，就是预算符前后都用空格隔开，这个是自动设置的，还是人为的？

今铭昔

LIUZHU 发表于 2023-7-31 11:55
学习了下铭佬的代码，然后自己写了一个

你的写法或许会出正确的结果，但是这样会有很大的问题，数组map的第二参数是为了给回调函数指定一个this对象，而箭头函数中是不能指定this的，箭头函数的this是根据上下文决定的，你可以把你的第2参数的{}去掉，也还是得到结果，因为你的这个第二参是多余的，箭头函数中的this是外部的this全局对象，根本不是指向第2参的对象。