用VBA代码把A列去重复之后，对应B列的数据全部连接在一起

888来来来 · 发表于 2023-3-29 21:43

本帖最后由 888来来来于 2023-3-29 22:15 编辑

Excel表格有2列数据这个表格数据是从别的表格加工后复制过来的  ，
复制粘贴之后先把A列物料编号进行排序，就是升序如果VBA代码可以解决  那就不用手工排序了
现在我需要得到这样1个结果
1.把工作表1的 A列数据，就是物料编号全部去重复，粘贴到另外1个工作表2

2.把工作表1的B列数据，单个单元格全部去重复  然后A列相同编号对应的B列数据，全部连接在一起  在粘贴到工作表2
3. 然后工作表2的B列数据，单个单元格还需要进行去重复

我自己是用函数解决的  但是数据量大于1万行，表格就特别卡，麻烦有高手可以用VBA代码可以解决吗  提供一下思路
具体可以查看附件

zxsea_7426 · 发表于 2023-3-29 22:48

两种方法竟然速度差不多，不过就是花的时间都这么长，有点奇怪

ykcbf1100 · 发表于 2023-3-30 09:51

参与一下，用了二个字典。

tanglf188 · 发表于 2023-3-30 11:26

把你的思路优化了一下：1、用字典对表一去重并连接B列，2、对B列去重并输出结果，3、对输出结果排序
问题是和你要求有点不一样

请参考

gwjkkkkk · 发表于 2023-3-30 19:25

参与一下。。。

888来来来 · 发表于 2023-3-30 23:04

gwjkkkkk 发表于 2023-3-30 19:25
参与一下。。。

我非常确定！你提供的结果就是我想要的结果。感觉VBA确实能解决一些数据量特别大,用VBA显得很简单。
而且我用函数解决这个问题，还是需要VBA解决单个单元格去重复的问题。

888来来来 · 发表于 2023-3-30 23:09

tanglf188 发表于 2023-3-30 11:26
把你的思路优化了一下：1、用字典对表一去重并连接B列，2、对B列去重并输出结果，3、对输出结果排序
问题 ...

感谢回复！你的VBA代码是我想要的结果你们的结果是对的我用函数的单元格是错误的而且用函数还是需要VBA进行单个单元格去重复

888来来来 · 发表于 2023-3-30 23:32

ykcbf1100 发表于 2023-3-30 09:51
参与一下，用了二个字典。

感谢你的回复你的结果也是对的我回公司用1万行数据试一下是不是也是秒得到结果
我这个数据其实A列是物料代码 B列是项目简称目的是查看物料编码有哪些有需求的项目在用这个物料。
B列是通过大概150个BOM清单用函数mid提取,phonetic连接提取的项目简称

888来来来 · 发表于 2023-3-31 23:08

gwjkkkkk 发表于 2023-3-30 19:25
参与一下。。。

我又发了1个帖子还是相同编号连接的问题，比上次的难度还要大1点
有时间麻烦看一下，能否解决。

		自动登录	找回密码
密码			免费注册

[求助] 用VBA代码把A列去重复之后，对应B列的数据全部连接在一起

评分

评分

评分

[求助] 用VBA代码 把A列去重复之后，对应B列的数据全部连接在一起

评分

评分

评分

[求助] 用VBA代码把A列去重复之后，对应B列的数据全部连接在一起