多行变成一行

mzx1987mzx

各位大神，请教一下，有没有更简单一点的方法，VBA方法也行，这个办法虽然可行，但是太耗时太慢了。

我原始的数据如表1所示，它是一行一行的，占用太多行，我现在想把它变成一行数据，我的做法是在结论前加一个辅助列，然后用VLOOKUP($B2&F$1,$D:$E,2,0)，虽然可行，但是效率太低了。
我只要编号那一列只要一行，现在有很多行。不知道我有没说清楚 原始数据.zip (10.08 KB, 下载次数: 24)

2023-11-20 21:13 上传

点击文件名下载附件

图1-原始数据

图2-最终要的结果

每次数据大概有1W~1.5W，缩短之后大概4k~5K，所以俺我那个方法太慢，效率实在太低。 office版本是2010，不支持新的函数哦。

mzx1987mzx

每次数据大概有1W~1.5W，缩短之后大概4k~5K，所以俺我那个方法太慢，效率实在太低。

灵犀之声

1. =IFERROR(LOOKUP(1,0/(($A$2:$A$65536=$F2)*($B$2:$B$65536=$G2)*($C$2:$C$65536=H$1)),$D$2:$D$65536),"")

复制代码

楼主要的是不是这个意思？

若能帮助您，给两朵小花花

hxj119

项目、编号
=IFERROR(INDEX(UNIQUE('1'!$A$2:$B$30),ROW(A1),COLUMN(A1)),"")
或者
=IFERROR(INDEX(A:A,SMALL(IF(MATCH($A$2:$A$30,$A$2:$A$30,0)=ROW($A$2:$A$30)-1,ROW($A$2:$A$30),9^9),ROW(A1))),""

各元素
=IFERROR(INDEX('1'!$D$2:$D$30,MATCH($A2&$B2&C$1,'1'!$A$2:$A$30&'1'!$B$2:$B$30&'1'!$C$2:$C$30,0)),"")

公式三键结束，右拉下拦

灵犀之声

请参考附件

mzx1987mzx

  2023-11-20 21:27
ο

IFERROR(LOOKUP(1,0/(($A$2:$A$65536=$F2)*($B$2:$B$65536=$G2)*($C$2:$C$65536=H$1)),$D$2:$D$65536),"")

л

mzx1987mzx

hxj119 发表于 2023-11-20 21:23
项目、编号
=IFERROR(INDEX(UNIQUE('1'!$A$2:$B$30),ROW(B2),COLUMN(B2)),"")

5楼的我懂了，你这个我还得的消化一下。
非常感谢

hxj119

mzx1987mzx 发表于 2023-11-20 21:40
5楼的我懂了，你这个我还得的消化一下。
非常感谢

项目、编号，修改一下公式=IFERROR(INDEX(UNIQUE('1'!$A$2:$B$30),ROW(A1),COLUMN(A1)),"")

quqiyuan

用PQ的透视列吧，简单可行

mzx1987mzx

quqiyuan 发表于 2023-11-20 21:50
用PQ的透视列吧，简单可行

PQ用不了，不给装