请教老师，单元格插入公式问题

7016427 · 发表于 2019-1-23 20:23

sheet1.[d7:i7,d17:i17].Formula = "=if(sheet1.[c7]>0,sum(r[-4]c:r[-1]c),"""")"
'执行时错误

7016427 · 发表于 2019-1-23 20:37

本帖最后由 7016427 于 2019-1-23 20:42 编辑

要求：sheet2.[c7]>0 时，求和

不知道为什么 · 发表于 2019-1-23 20:42

7016427 发表于 2019-1-23 20:37
要求：sheet2.[c7]>0 时，求和

测试正常啊

7016427 · 发表于 2019-1-23 20:54

不知道为什么发表于 2019-1-23 20:42
测试正常啊

Sub aa()
With Sheet2
.[d7:i7].Formula = "=if(c7>0,sum(d3:d6),"""")"
.[d17:i17].Formula = "=if(c17>0,sum(d13:d16),"""")"
End With
End Sub

不知道为什么 · 发表于 2019-1-23 20:56

7016427 发表于 2019-1-23 20:54
Sub aa()
With Sheet2
.[d7:i7].Formula = "=if(c7>0,sum(d3:d6),"""")"

那写成 $C$7，就可以啊

ww87725244 · 发表于 2019-1-23 21:06

.[d7:i7,d17:i17].FormulaR1C1 = "=if(r1c3>0,sum(r[-4]c:r[-1]c),"""")"

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

[求助] 请教老师，单元格插入公式问题