用VBA自字义函数实现累加

bbhiox

要求：在A6、C6、E6、G6、I6中输入数据后，在B6、D6、F6、H6、J6中实现自动累加效果，并且在鼠标点击单元格I4、I8时可以实现如下日期选择效果：用VBA怎样解决，如图，请各位高手解决，谢谢！！



具体见附件:

happym8888

楼主，你这个问题我不是答过了吗？见链接：
VBA实现累加
http://www.excelpx.com/thread-226266-1-1.html
要是不符合你的要求，尽管在原帖上回复啊？何必重复发帖？