Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 1719|回复: 6

[VBA] VBA统计C列额度结果保存D列 用两种方法

[复制链接]
发表于 2016-11-13 21:48 | 显示全部楼层 |阅读模式
本帖最后由 laoau138 于 2016-11-13 21:51 编辑

VBA统计C列额度结果保存D列   用两种方法




本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2016-11-13 21:54 | 显示全部楼层
是练级的?还没注意到。看来上个贴都不应该回
回复

使用道具 举报

发表于 2016-11-13 21:57 | 显示全部楼层
粗略看了下,还真是练级的。上贴真的回错了,稍不留意就掉坑里了
回复

使用道具 举报

 楼主| 发表于 2016-11-13 22:27 | 显示全部楼层
上清宫主 发表于 2016-11-13 21:54
是练级的?还没注意到。看来上个贴都不应该回

你的回答都是错误的,还在乱说八道
回复

使用道具 举报

发表于 2016-11-14 08:10 | 显示全部楼层
教授出考题啦!!
回复

使用道具 举报

发表于 2016-11-30 13:35 | 显示全部楼层
为什么一直没人做呢?

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
回复

使用道具 举报

 楼主| 发表于 2016-11-30 15:34 | 显示全部楼层
grf1973 发表于 2016-11-30 13:35
为什么一直没人做呢?

果然是高手
书上的代码也没有你的好


Function gather(rng As Range) As Double
  '将rng参数所代表的单元格重置为列数为1、行数等于公式所在的合并区域,然后对这个区域求和,将计算结果作为函数的最终结果
  gather = WorksheetFunction.Sum(rng.Resize(Application.ThisCell.MergeArea.Rows.Count, 1))
End Function



回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-4-23 20:18 , Processed in 0.372004 second(s), 7 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表