|
楼主 |
发表于 2020-1-29 13:55
|
显示全部楼层
本帖最后由 wyzdddl 于 2020-1-29 13:58 编辑
山菊花老师,这个代码也出现了错误,有时间请您给看看,哪位老师不在线,麻烦您给看看
Range("C11").Formula = "=IF(TODAY()-""" & Year(Date) & "-1-1"" 这个语句中的蓝色部分是一位老师给写的。运行正常,生成的公式也正确。
可是我把它写在下面的公式中,生成的公式中的引号无法去除(蓝色部分)。
Cells(FKH + 1, 10).FormulaR1C1 = "=ROUNDUP(IF(RC6<""" & Year(Date) & "-3-1"",0,(DATEDIF(""" & Year(Date) & "-1-1"",RC6,""D"")*0.0004*RC8)),0)"
将公式写成上面这样后,蓝色字体部分生成的公式带引号,不能正确计算
这是生成的公式ROUNDUP(IF($F30<"2020-3-1",0,(DATEDIF("2020-1-1",$F30,"D")*0.0004*$H30)),0)
这个“2003-03-1”日期没有引号才能 正常计算 |
|