文本内容转表格

dmm2001

老师好。我的客户发过来的都是微信文本格式。

如何转成表格呢。

魚。。

这活适合用VBA正则提取

魚。。

文本内容转表格_魚.rar (10.54 KB, 下载次数: 26)

2024-3-28 07:48 上传

点击文件名下载附件

dmm2001

魚。。 发表于 2024-3-28 07:48

非常感谢老师的热情回复。是这样的。。。。谢谢啦。

quqiyuan

PQ做的方案，供参考

ggw092

1. =LET(C,LET(B,TEXTAFTER(CHOOSECOLS(WRAPROWS(A2:A37,4),3),"："),IFERROR(MID(B,BYROW(IFERROR(FIND({"：",":"},B),0),LAMBDA(X,SUM(X)))-2,5),"")),G,WRAPROWS(A2:A37,4),HSTACK(LET(A,TEXTAFTER(CHOOSECOLS(G,2),"："),LEFT(A,FIND("人",A)-2)),RIGHT(TEXTSPLIT(CHOOSECOLS(G,2),{"人";"客人："},,1),1),TEXTAFTER(CHOOSECOLS(G,2),"人",-1),SUBSTITUTE(TEXTAFTER(CHOOSECOLS(G,3),"："),C,""),C,RIGHT(CHOOSECOLS(G,4),2)))

复制代码

函数版本：一键 转换

cnmlgb9998

试着用PQ，完美解决。就算你数据再增加，或更复杂 ，也能自动出结果。

cnmlgb9998

有大佬能看一下我上面的PQ 方案吗？从0开始， 学了整整3个月的结果 。

橒♂蝣

=DROP(REDUCE("",SEQUENCE(9),LAMBDA(a,b,LET(
info_one,FILTER(SUBSTITUTE(A2:A37,"：",":"),LOOKUP(ROW(A2:A37),ROW(A2:A37)/ISNUMBER(A2:A37),A2:A37)=b),
list,TEXTSPLIT(TEXTJOIN(",",1,IFERROR(TEXTAFTER(info_one,":"),"")),VSTACK("人",",")),
name,TEXTSPLIT(INDEX(list,,1),SEQUENCE(10)-1,,1),
num,TEXTSPLIT(INDEX(list,,1),name,,1),
concat,CONCAT(INDEX(list,,3)),
split_concat,TEXTSPLIT(concat,TEXTSPLIT(concat,VSTACK(":",SEQUENCE(10)-1),,1),,1),
time,CONCAT(IF(ISNUMBER(FIND(":",split_concat))*ISNUMBER(--split_concat),split_concat,"")),
VSTACK(a,HSTACK(name,num,INDEX(list,,2),INDEX(list,,3),time,INDEX(list,,4)))
))),1)