单元格中填充公式

Gaudi34 · 发表于 2022-11-30 14:19

各位老师好，我想在每张工作表中的G列添加“=IF(ISERROR((C5-B5)/B5),"",(C5-B5)/B5)”，但是程序报错，请问如何修改代码才能批量添加公式呢？3号表格是想要实现的结果，剩下两张表想批量添加公式，如何实现呢，谢谢老师了。

tennicse · 发表于 2022-11-30 14:26

两个句子测试都通过

sheet.Range("G5").Formula = "=IF(IsERROR((C5-B5)/B5)," & Chr(34) & Chr(34) & ",(C5-B5)/B5)"
sheet.Range("G5").Formula = "=IF(IsERROR((C5-B5)/B5),"""",(C5-B5)/B5)"

ykcbf1100 · 发表于 2022-11-30 14:31

这样改一下就好了。

qdtzq · 发表于 2022-11-30 14:35

中间的引号加倍
sheet.Range("G5").Formula = "=IF(IsERROR((C5-B5)/B5),"""",(C5-B5)/B5)"

Gaudi34 · 发表于 2022-12-2 13:20

感谢各位老师的帮助！！！

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

[求助] 单元格中填充公式

评分

评分

评分