达人们，想要个更自动的公式

662092ww

一个财务上科目重分类的问题

自己用sumifs是可以解决的，但是遇到数据量大，且表格经常替换的情况下，自己手工去筛选科目+客户后，再用公式就非常麻烦

有没有更自动的公式，贴完基础数据后，在新表格制定区域自动把这些数据整出来

比如LAMD等这些函数

亦或者直接上VBA

详细在附件

loirol

供参考

mjm04

写的不好，开个火车；

一步到位的，写到 数据区域1000行；M365应该可以用

=LET(a,GROUPBY(HSTACK(B2:B1000,G2:G1000),HSTACK(O2:O1000,P2:P1000),SUM,,0,-1,G2:G1000<>""),b,CHOOSECOLS(a,1,2),c,CHOOSECOLS(a,3),d,CHOOSECOLS(a,4),cc,IF(c-d>0,c-d,0),dd,IF(d-c>0,d-c,0),VSTACK(HSTACK(b,cc,dd),HSTACK({"","合计:"},SUM(cc),SUM(dd))))

662092ww

loirol 发表于 2024-11-7 09:33
供参考

我再请教下，把这个执行结果放到另外一个页签（另外一个工作表，不是另外一个文件）怎么改vba

loirol

662092ww 发表于 2024-11-7 10:00
我再请教下，把这个执行结果放到另外一个页签（另外一个工作表，不是另外一个文件）怎么改vba

lanjian229

把客户插到一级科目后，直接一个groupby轻松解决，而且计算量小

忙到飞起

=DROP(LET(a,UNIQUE(HSTACK(B3:B58,G3:G58)),REDUCE(1,TAKE(a,,1)&TAKE(a,,-1),LAMBDA(x,y,LET(b,BYCOL(FILTER(O3:P58,B3:B58&G3:G58=y),SUM),c,TAKE(b,,1)-TAKE(b,,-1),VSTACK(x,IF(c>0,HSTACK(c,TAKE(b,,-1)),HSTACK("- ("&c&") ",TAKE(b,,-1)))))))),1)
写的不好

662092ww

loirol 发表于 2024-11-7 10:09

兄弟 你是个懂的，我想参照你的继续编一下，编辑不下去了

还多了个步骤，根据计算结果

如果应收账款的贷方余额，要将科目改为 预收款项

如果是其他应收款的贷方余额要将科目改成 其他应付款

如果是其他应付款的借方余额，科目要改成 其他应收款

如果是应付账款的借方余额，科目要改成 预付款项

如果是预付款项的贷方余额，科目要改成 应付账款


请帮忙帮到底吧

详细在附件里

lanjian229

LET(z,VSTACK(R2:U2,LET(q,GROUPBY(HSTACK(B2:B999,G2:G999),O2:P999,SUM,1,0),s,TAKE(q,,-2),l,BYROW(s*{1,-1},SUM),HSTACK(TAKE(q,,2),l*(l>0),-l*(l<0)))),GROUPBY(TAKE(z,,2),TAKE(z,,-2),SUM,3,1))
因有第一行说明，没选全列

mykitami

用groupby,一个公式完成
=VSTACK(HSTACK("一级
名称","客户","期末借方","期末贷方"),DROP(GROUPBY(HSTACK(B2:B9999,G2:G9999),O2:O9999-P2:P9999,HSTACK(LAMBDA(x,(SUM(x)>0)*SUM(x)),LAMBDA(x,-(SUM(x)<0)*SUM(x))),1,0,-1,B2:B9999<>""),1))