将x-n,y-m范围内的数据拆分成多行

edwin11891

拉火车：

1. =REDUCE(HSTACK(B1:C1,E1:F1),E2:E6,LAMBDA(_s,_t,VSTACK(_s,LET(_m,REDUCE("",TEXTSPLIT(SUBSTITUTE(_t,CHAR(10),""),","),LAMBDA(x,y,VSTACK(x,CHOOSE({1,2,3,4},OFFSET(_t,,-3),OFFSET(_t,,-2),IF(ISNUMBER(FIND("-",y)),LET(n,REGEXP(y,"\d+"),nc,INDEX(REGEXP(y,".*?(?=\d+-)"),1),nc&SEQUENCE(INDEX(n,2)-INDEX(n,1)+1,,INDEX(n,1),1)),y),OFFSET(_t,,1))))),DROP(_m,1)))))

复制代码

Z平生

gwjkkkkk 发表于 2024-7-26 20:52
.................

非常感谢　多页会出现“下标越界”，我不懂ＶＢＡ，能否帮忙调试一下。

Z平生

也感谢大家的支持和帮忙！

Z平生

edwin11891 发表于 2024-7-27 12:08
拉火车：

谢谢，出现嵌套层数超。。。

gwjkkkkk

Z平生 发表于 2024-7-27 15:14
非常感谢　多页会出现“下标越界”，我不懂ＶＢＡ，能否帮忙调试一下。

ReDim br(10 ^ 5, 1 To 3)
数据未知，可将结果数组定义的大一点。。。红色地方改成5

遗忘@瞬间

用的power query

edwin11891

Z平生 发表于 2024-7-27 15:37
谢谢，出现嵌套层数超。。。

不应该的。我是WPS下的，用EXCEL时公式中的REGEXP函数需要对应换成REGEXEXTRACT：

1. =REDUCE(HSTACK(B1:C1,E1:F1),E2:E6,LAMBDA(_s,_t,VSTACK(_s,LET(_m,REDUCE("",TEXTSPLIT(SUBSTITUTE(_t,CHAR(10),""),","),LAMBDA(x,y,VSTACK(x,CHOOSE({1,2,3,4},OFFSET(_t,,-3),OFFSET(_t,,-2),IF(ISNUMBER(FIND("-",y)),LET(n,REGEXEXTRACT(y,"\d+",1),nc,INDEX(REGEXEXTRACT(y,"[a-zA-Z]+"),1),nc&SEQUENCE(INDEX(n,2)-INDEX(n,1)+1,,INDEX(n,1),1)),y),OFFSET(_t,,1))))),DROP(_m,1)))))

复制代码

cnmlgb9998

1. =DROP(
   
2.     REDUCE(
   
3.         0,
   
4.         E2:E6,
   
5.         LAMBDA(x, y,
   
6.             VSTACK(
   
7.                 x,
   
8.                 LET(
   
9.                     _a, SUBSTITUTE(y, CHAR(10), ""),
   
10.                     _b, TEXTSPLIT(_a, , ",", TRUE),
    
11.                     _c, DROP(
    
12.                         REDUCE(
    
13.                             0,
    
14.                             _b,
    
15.                             LAMBDA(m, n,
    
16.                                 IF(
    
17.                                     ISNUMBER(FIND("-", n)),
    
18.                                     LET(
    
19.                                         _d, TEXTSPLIT(n, , "-", TRUE),
    
20.                                         _e, TOCOL(REGEXEXTRACT(_d, "\d+"), 3),
    
21.                                         _f, SEQUENCE(
    
22.                                             @TAKE(_e, -1) - @TAKE(_e, 1) + 1,
    
23.                                             ,
    
24.                                             @TAKE(_e, 1),
    
25.                                             1
    
26.                                         ),
    
27.                                         VSTACK(m, REGEXEXTRACT(TAKE(_d, 1), "[^0-9]+") & _f)
    
28.                                     ),
    
29.                                     VSTACK(m, n)
    
30.                                 )
    
31.                             )
    
32.                         ),
    
33.                         1
    
34.                     ),
    
35.                     IFNA(HSTACK(OFFSET(y, , -3, , 2), _c), OFFSET(y, , -3, , 2))
    
36.                 )
    
37.             )
    
38.         )
    
39.     ),
    
40.     1
    
41. )

复制代码

zpy2

//select * from consolidateSheet limit 20;
cli_sequence~consolidateSheet~f07;
cli_no_header;
select f04,f05,f07 from consolidateSheetsplit;