高手出招吧，LRC歌词转化，求公式

ifan0916

        


如图：
sheet1表中将A列单行LRC歌词合并压缩成B列结果（歌词相同的按时间轴顺序合并压缩，如：“[00:28.76]没有花香 没有树高；[02:00.59]没有花香 没有树高”合并压缩为“[00:28.76][02:00.59]没有花香 没有树高”               
sheet2表中将A列合并压缩LRC歌词转化成B列单行歌词（歌词相同的按时间轴顺序分解为单行，如：“[00:28.76][02:00.59]没有花香 没有树高”转化为：“[00:28.76]没有花香 没有树高[02:00.59]没有花香 没有树高”        

pgp5866

=LET(s,CONCAT(FILTER(A6:A31,TEXTAFTER(A6:A31,"]")<"啊")),VSTACK(s,UNIQUE(DROP(REDUCE("",A6:A31,LAMBDA(X,Y,LET(q,TEXTAFTER(Y,"]"),IF(q>"啊",VSTACK(X,CONCAT(FILTER(TEXTBEFORE(A6:A31,"]")&"]",TEXTAFTER(A6:A31,"]")=q),q)),X)))),1))))

qwer401245

xiaoding0526

大开眼界，这都行啊，我以前都是手动搞得

橒♂蝣

=LET(X,RIGHT(A6:A31,LEN(A6:A31)-10), Y,LEFT(A6:A31,10), MAP(UNIQUE(X),LAMBDA(M,TEXTJOIN(" ",1,FILTER(Y,X=M),M))) )

edwin11891

sheet2，反演：

1. =DROP(SORT(REDUCE("",A6:A15,LAMBDA(x,y,LET(SS,TOROW(TRIM(TEXTSPLIT(y,{"[","]"})),3),
   
2.       Stime,DROP(SS,,-1),
   
3.       SST,FILTER(Stime,CHOOSECOLS(Stime,SEQUENCE(COLUMNS(Stime)))<>""),
   
4.       Ssong,TAKE(SS,,-1),
   
5.       VSTACK(x,"["&TOCOL(SST,1)&"]"&TOCOL(IF(SST<>"",Ssong,1/0),2))))),1),1)

复制代码

咔咔乱坠

挺有趣的
合

1. =LET(a,A6:A31,b,TEXTAFTER(a,"]"),REDUCE(A1:A5,UNIQUE(b),LAMBDA(x,y,VSTACK(x,CONCAT(TEXTSPLIT(FILTER(a,b=y),y),y)))))

复制代码

咔咔乱坠

拆

1. =VSTACK(A1:A5,SORT(DROP(REDUCE(0,A6:A15,LAMBDA(x,y,VSTACK(x,LET(a,TEXTAFTER(y,"]",-1),TEXTSPLIT(y,a,"]",1)&"]"&a)))),1)))

复制代码

edwin11891

咔咔乱坠 发表于 2024-1-28 12:09
拆

优秀！函数短多了！

ifan0916

以上收到   有些高版本函数暂时用不了  思路不错   值得学习