将竖列内容分组后变为横排显示

fs5267

无关岁月 发表于 2025-4-1 11:42
火车来了

我用的office2019，说FILTER这个函数无效。要不我换成365版本？

fs5267

紫川文秀 发表于 2025-4-1 11:43
=LET(arr,TEXTSPLIT(TEXTJOIN("|",,FILTER(A:A,A:A"")),,"#"),brr,"#"&FILTER(arr,arr""),IF(RIGHT(brr)="| ...

也是说FILTER函无效。你用的2021吗

fs5267

mengrs 发表于 2025-4-1 12:19
=TEXTSPLIT(TEXTJOIN(",",1,SUBSTITUTE(Sheet1!A1:A99,"#","@#")),",","@",1,,"")

错误了。我需要怎么改一下？

fs5267

hxj119 发表于 2025-4-1 12:49

卡在C这个字符了。

wyslw2004

liulang0808 发表于 2025-4-1 10:58
vba处理的供参考

=IFNA(DROP(LET(s,FILTER(A:A,A:A<>""),a,IF(ISNUMBER(FIND("#",s)),"；"&s,s&"，"),TEXTSPLIT(CONCAT(a),"，","；")),1),"")

mykitami

=LET(_a,Sheet1!A1:A9999,_f,SCAN(0,_a,LAMBDA(x,y,IF(LEFT(y)="#",x+1,x))),DROP(REDUCE("",UNIQUE(_f),LAMBDA(x,y,LET(_b,TOROW(FILTER(_a,(_f=y)*(_a<>""))),_c,DROP(_b,,-4),VSTACK(x,HSTACK(_c,EXPAND("",,12-COLUMNS(_c),""),TAKE(_b,,-4)))))),1))

wyslw2004

上面的错误了，少了一列，这个才是正确的。
=IFNA(DROP(LET(s,FILTER(A:A,A:A<>""),a,IF(ISNUMBER(FIND("#",s)),"；"&s&"，",s&"，"),TEXTSPLIT(CONCAT(a),"，","；")),1),"")

wyslw2004

再简化一下公式：
=IFNA(LET(s,FILTER(A:A,A:A<>""),a,IF(ISNUMBER(FIND("#",s)),"；"&s&"，",s&"，"),TEXTSPLIT(CONCAT(a),"，","；",1)),"")

wyslw2004

抱歉，忘了截图。（怎么感觉我在骗分呢，抱歉啊，只此一次了）

快乐王子238

开火车=LET(data,TRIMRANGE(Sheet1!A1:A1000,2),arr,SCAN("",data,LAMBDA(x,y,IF(ISNUMBER(FIND("#",y)),y,x))),brr,FILTER(HSTACK(arr,data),(arr<>data)*(data<>"")),DROP(REDUCE("",UNIQUE(arr),LAMBDA(x,y,VSTACK(x,HSTACK(y,LET(n,FILTER(TAKE(brr,,-1),TAKE(brr,,1)=y),TOROW(VSTACK(DROP(n,-4),EXPAND("",16-ROWS(n)-1,,""),TAKE(n,-4)))))))),1))