做EXCEL公式模板，这个表有公式但是没有数据，我把数据复制到模板，就按模板上的公式了

发布网友发布时间：2022-04-28 23:27

共3个回答

热心网友时间：2023-10-15 00:09

如果你的数据很多的话，除了每次重新编公式、下拉填充公式麻烦，而且速度也很慢
建议用以下方法
1、利用数据透视表替代sumif函数
2、利用宏写公式，计算完毕后去掉公式
方法如下：编写第一行公式时录制宏，录制完毕后进去修改,比如
i = ActiveSheet.UsedRange.Rows.Count ‘取当前使用行次，也可以用COUNTA函数计算
For j = 2 To i
Range("A" & j).FormulaR1C1 = "=ROW()-6" '定义公式
Range("C" & j).FormulaR1C1 = "=RC[-4]-RC[-2]" '定义公式
Range("J" & j).Formula = "=RC[-4]-RC[-2]" '定义公式
Range("K" & j).Formula = "=ROUND(RC[-4]-RC[-2],2)" '定义公式
Range("M" & j).Formula = "=RC[-2]+RC[-1]" '定义公式
Range("N" & j).Formula = "=RC[-9]-RC[-5]" '定义公式
Range("A" & j & ":N" & j).Value = Range("A" & j & ":N" & j).Value '去掉公式
Next j追问你写东西我一点都看不懂啊我先了解一下宏你能给我做一个简单的就是A与B的和在C列显示的程序等我看懂宏后我来验证你写的是否正确

追答你发一个表样给我，我来研究一下。545112237@qq.com

热心网友时间：2023-10-15 00:09

可以用宏吧

热心网友时间：2023-10-15 00:10

没看明白你的问题，你是想得到模版数据，还是想得到公式，目的是什么？追问要的是带有公式的模版