在单元格中生成数据加和的公式（已解决）

liusjie · 发表于 2005-11-30 18:16

将每月末的收发存汇总数据表使用VBA解决将同一订单、规格、表色的收发各条数据分别加和到第一条所在的对应单元格中如果有两个以上数据就填入公式，以便比对；如果只有一个数只需填入就可以了；没有数的话就不用填了感谢各位的热情帮助，衷心感谢在进行单元格比较的问题上，taller版主和prince兄的热情指点请高手对代码进行批评指导

HLrSW1oZ.rar (16.43 KB, 下载次数: 5)

[此贴子已经被作者于2005-12-3 13:20:44编辑过]

Play3 · 发表于 2005-11-30 18:35

请问楼主

Cells(i - 1, 15).FormulaR1C1 = "=cells(" & i - 1 & ",15)+cells(" & i & ",15)"

像这样子好像就是直接把“公式”而不是“计算结果”放入单元格吧？

这样有什么好处吗？为什么不直接把结果写入单元格呢?

liusjie · 发表于 2005-11-30 18:47

不好意思，我还是没有表达明白

就是在最上面的一行中得到总计数值，但是选中该单元格时，编缉栏中显示是由哪几个数值相加得到的，以便与别人比对是哪一个数输入错了还是别人搞错了，就象附件中，左边的源表得到右边的结果

谢谢

Play3 · 发表于 2005-11-30 19:04

哦原来这样啊^^

但是这个cells(" & i - 1 & ",15)里面的" & i - 1 & "是什么意思哇[em06]

liusjie · 发表于 2005-11-30 19:11

第i-1行呀，如果第i行与第i-1行相同，就在上面的一行即i-1行的单元格内得到由数值相加得到的值（选中单元格时编缉栏显示是相加的公式）

不知说明白没有

Play3 · 发表于 2005-11-30 19:26

这个听起来感觉像会有无限循环[em06]

再请问一下^^ " & i - 1 & " 中的引号＆是什么作用哇

liusjie · 发表于 2005-12-1 10:11

再次请教一下这里的各位老师，可有解决办法

谢谢

ab007 · 发表于 2005-12-1 10:33

为什么一定用vba呢?用分类汇总不好吗

yxjline · 发表于 2005-12-1 10:42

输入公式要用ActiveCell.FormulaR1C1 = "=R[]C[]+R[]C[]"格式，但如果按你的要求看，输入这个会造成循环引用，不知你到底是要加总哪些数据。

liusjie · 发表于 2005-12-1 11:14

应该不会造成循环的吧，最后得到的是下面同项目的单元格的数据相加的值，是数据而不是数据所在单元格的引用

用户名		自动登录	找回密码
密码			免费注册