连续未填色单元格出现的次数统计

msw2395

edwin11891 发表于 2024-11-21 19:35
明白了，从右往左，还必须连续。公式修改一下，稍显复杂了些：

谢谢edwin11891老师!!结果很可以的。这个好像是固定列的吧，如何实现随着列数向右增加，A列结果自动更新呢

edwin11891

msw2395 发表于 2024-11-21 21:07
谢谢edwin11891老师!!结果很可以的。这个好像是固定列的吧，如何实现随着列数向右增加，A列结果自动更新 ...

只需要修改公式中的对应列号，如果行数有变化，修改最开始的“26”即可：

=BYROW(C2:AP26,LAMBDA(y,LET(fx,LAMBDA(XX,IF((XX="")*(OFFSET(XX,-1,1)="")*(OFFSET(XX,1,-1)=""),1,0)),t,MAP(y,LAMBDA(x,IF((fx(x)=1)*(fx(INDIRECT("AP"&ROW(x)))=1)*(fx(INDIRECT("AO"&ROW(x)))=1),1,0))),s,LEN(TEXTSPLIT(CONCAT(t),0)),R,CONCAT(TEXTSPLIT(CONCAT(s),0)),Rf,IF(MID(R,LEN(R)-SEQUENCE(,LEN(R)-1,0),1)*1>1,1,0),SD,XMATCH(0,Rf,)-1,Res,IFERROR(SUM(TAKE(Rf,,SD)),""),IF(Res<2,"",Res))))

msw2395

edwin11891 发表于 2024-11-21 21:09
只需要修改公式中的对应列号，如果行数有变化，修改最开始的“26”即可：

=BYROW(C2:AP26,LAMBDA(y,LE ...

谢谢老师，了解了。问下老师：随着列数向右增加，"AP"、"AO"这里能不能实现自动更改呢？毕竟如果表多的话，逐个手工修改还是有点不方便的

edwin11891

msw2395 发表于 2024-11-21 21:39
谢谢老师，了解了。问下老师：随着列数向右增加，"AP"、"AO"这里能不能实现自动更改呢？毕竟如果表多的话 ...

当然可以，只是公式就还得拉长！

edwin11891

msw2395 发表于 2024-11-21 21:39
谢谢老师，了解了。问下老师：随着列数向右增加，"AP"、"AO"这里能不能实现自动更改呢？毕竟如果表多的话 ...

只需要修改开始的范围即可：

=BYROW(C2:AP26,LAMBDA(y,LET(fx,LAMBDA(XX,IF((XX="")*(OFFSET(XX,-1,1)="")*(OFFSET(XX,1,-1)=""),1,0)),fy,LAMBDA(YY,SUBSTITUTE(ADDRESS(1,YY,4),1,)),nCol,MAX(COLUMN(y)),eCol,fy(nCol),sCol,fy(nCol-1),t,MAP(y,LAMBDA(x,IF((fx(x)=1)*(fx(INDIRECT(eCol&ROW(x)))=1)*(fx(INDIRECT(sCol&ROW(x)))=1),1,0))),s,LEN(TEXTSPLIT(CONCAT(t),0)),R,CONCAT(TEXTSPLIT(CONCAT(s),0)),Rf,IF(MID(R,LEN(R)-SEQUENCE(,LEN(R)-1,0),1)*1>1,1,0),SD,XMATCH(0,Rf,)-1,Res,IFERROR(SUM(TAKE(Rf,,SD)),""),IF(Res<2,"",Res))))

msw2395

edwin11891 发表于 2024-11-21 22:16
只需要修改开始的范围即可：

=BYROW(C2:AP26,LAMBDA(y,LET(fx,LAMBDA(XX,IF((XX="")*(OFFSET(XX,-1,1) ...

非常感谢edwin11891老师的耐心解答!!开始的范围C2:AP26这个一般C2不变，变化的是AP26，函数不好表达，是不是可以通过vba代码来表示变化的最后列？

edwin11891

msw2395 发表于 2024-11-22 09:10
非常感谢edwin11891老师的耐心解答!!开始的范围C2:AP26这个一般C2不变，变化的是AP26，函数不好表达，是 ...

数据范围改变，公式只需要修改开始范围“C2:AP26”即可，其余在公式里已经自动识别了。总不能什么都不指定、让公式自己去找吧（虽然说技术上也没有问题）？
最后列就是公式里面的sCOl，倒数第二列是eCol，不需用VBA啊。

msw2395

edwin11891 发表于 2024-11-22 09:14
数据范围改变，公式只需要修改开始范围“C2:AP26”即可，其余在公式里已经自动识别了。总不能什么都不指 ...

是的，刚刚了解了修改开始范围“C2:AP26”批量操作就可以的。再次感谢edwin11891老师，公式给的很完美了

msw2395

edwin11891 发表于 2024-11-22 09:14
数据范围改变，公式只需要修改开始范围“C2:AP26”即可，其余在公式里已经自动识别了。总不能什么都不指 ...

再问下edwin11891老师，下图中第10行应显示为2，但为何没结果，是不是函数公式有最少列数的限制？

edwin11891

msw2395 发表于 2024-11-23 10:18
再问下edwin11891老师，下图中第10行应显示为2，但为何没结果，是不是函数公式有最少列数的限制？

没看出有什么问题，还是稍修改了一下，检查没问题。

1. =BYROW(C2:W26,LAMBDA(y,LET(fx,LAMBDA(XX,IF((XX="")*(OFFSET(XX,-1,1)="")*(OFFSET(XX,1,-1)=""),1,0)),fy,LAMBDA(YY,SUBSTITUTE(ADDRESS(1,YY,4),1,)),nCol,MAX(COLUMN(y)),eCol,fy(nCol),sCol,fy(nCol-1),t,MAP(y,LAMBDA(x,IF((fx(x)=1)*(fx(INDIRECT(eCol&ROW(x)))=1)*(fx(INDIRECT(sCol&ROW(x)))=1),1,0))),s,LEN(TEXTSPLIT(CONCAT(t),0)),Ra,CONCAT(TEXTSPLIT(CONCAT(s),0)),Rf,IF(MID(Ra,SEQUENCE(,LEN(Ra),1),1)*1>1,1,0),SD,XMATCH(0,Rf,,-1),Res,IFERROR(SUM(DROP(Rf,,SD)),""),De,IF(Res<2,"",Res),De)))

复制代码