求VBA分类汇总并转置

AR_kin

老师们，求VBA实现按条件分类汇总并转置到不同列，实现合计

zpy2

select * from 基础分类汇总表转二维;
create temp table aa as
select 工程,费用类别,sum(金额) 金额 from 基础分类汇总表转二维 group by 工程,费用类别;
create temp table bb as
select 工程,'合计' 费用类别,sum(金额) from 基础分类汇总表转二维 group by 工程;
create temp table cc as
select '合计' 工程,费用类别,sum(金额) from 基础分类汇总表转二维 group by 费用类别;
create temp table dd as
select '合计' 工程,'合计' 费用类别,sum(金额) from 基础分类汇总表转二维;
create temp table ee as
select * from aa union all
select * from bb union all
select * from cc union all
select * from dd;
cli_create_two_dim_no_order~ee~费用类别~金额;
select * from ee_two_dim;

ykcbf1100

分类汇总。。。

洋务德雷

想多了吧，用透视表不就直接出结果了吗？

AR_kin

ykcbf1100 发表于 2023-3-1 14:56
分类汇总。。。

非常感谢ykcbf1100老师

AR_kin

zpy2 发表于 2023-3-1 14:53
select * from 基础分类汇总表转二维;
create temp table aa as
select 工程,费用类别,sum(金额) 金额 f ...

谢谢zpy2老师