[已解决]自定义动态汇总难题，跪求答案！

bfs1981 · 发表于 2014-11-28 01:48

最佳答案

月排行榜 / 总排行榜

那么的帅

2014-11-28 02:42

bfs1981 发表于 2014-11-28 01:50
附件奉上

利用VBA代码完成

335269-VBA-自动汇总数据-示例最后一步.rar (22.17 KB, 下载次数: 9)

bfs1981 · 发表于 2014-11-28 01:50

附件奉上

那么的帅 · 发表于 2014-11-28 02:42

bfs1981 发表于 2014-11-28 01:50
附件奉上

利用VBA代码完成

335269-VBA-自动汇总数据-示例最后一步.rar (22.17 KB, 下载次数: 9)

faliming7 · 发表于 2014-11-28 08:58

本帖最后由 faliming7 于 2014-11-28 09:01 编辑

不在原贴提问又开新贴不利于大家学习哦·！
目前的问题可以通过修改公式解决，如“其他费用”几个字是在B列最下一行，那么B列的公式就可以改成=IF(SUM((数据源!$G$2:$G$100=$B$6)*(数据源!$M$2:$M$100<>0))=ROW()-7,INDEX(数据源!B:B,SMALL(IF((数据源!$G$2:$G$100=$B$6)*(数据源!$M$2:$M$100<>0),ROW($2:$100),4^8),ROW($A1))),IF(SUM((数据源!$G$2:$G$100=$B$6)*(数据源!$M$2:$M$100<>0))=ROW()-8,"其他费用",""))
但是这里又遇到一个问题，就是你是提前把所有的公式下拉了，以期望得到只修改B6单元格的公司名称，内容就全部显示。这样的话会遇到一个打印的问题，因此打印区域又要做些设置。设置打印区域，然后在插入－名称里找到Print_Area这个名称，把公式改成=OFFSET(想要的示例A!$A$1,,,8+SUM((数据源!$G$2:$G$100=想要的示例A!$B$6)*(数据源!$M$2:$M$100<>0)),8)使打印区域成为一个自动适应的区域即可。

示例最后一步.rar (26.41 KB, 下载次数: 1)

bfs1981 · 发表于 2014-11-28 11:31

那么的帅发表于 2014-11-28 02:42
利用VBA代码完成

真心谢谢这么晚解答我的问题，VBA很好，虽然有些地方不懂，但我会慢慢研究，有这个思路就好

bfs1981 · 发表于 2014-11-28 11:40

faliming7 发表于 2014-11-28 08:58
不在原贴提问又开新贴不利于大家学习哦·！
目前的问题可以通过修改公式解决，如“其他费用”几个字是在B列 ...

谢谢版主的提醒，没意识到还有这一层
那我在这边加一个链接吧
相关贴
http://www.excelpx.com/thread-335198-1-1.html

真心感谢版主给的思路。

bfs1981 · 发表于 2014-11-28 14:38

那么的帅发表于 2014-11-28 02:42
利用VBA代码完成

老师你好，其中，运费如果是0的话，则不显示这一行
换个意思，也就是说：只筛选产生运费的那些行

		自动登录	找回密码
密码			注册

[已解决]自定义动态汇总难题，跪求答案！

相关帖子