错误提示:
不能设置类 Range 的 FormulaArray 属性
Rg = Ws.Range("G3")
Rg.FormulaArray = _
"=IF(RC[-2]=""部门计划"",(""C_"" & VLOOKUP(RC[-3],部门范围,2) & RIGHT(TEXT(RC[-6],""0000""),2) & RIGHT(TEXT(RC[-5],""00""),2) & RIGHT(TEXT(RC[-4],""00""),2) & ""_1""),If(RC[-2]=""临时安排"",(""C_"" & VLOOKUP(RC[-1],类别范围,2) & RIGHT(TEXT(RC[-6],""0000""),2) & RIGHT(TEXT(RC[-5],""00""),2) & RIGHT(TEXT(RC[-4],""00""),2) & ""_1""),If(RC[-2] = ""上月顺延"",INDEX(任务编号,SMALL(If(未完成任务处置=""顺延" & _
"完成任务处置)-2,""""),COUNTIF(R3C5:RC[-2],""上月顺延""))),"""")))"
Rg.AutoFill (Destination:= Ws.Range("G3:G17"), Type:= MsExcel.XlAutoFillType.xlFillDefault)
这个太折腾人了,用代码来设置报错;在模板文件中设好也报错,会自动删除公式。而这个公式在表中测试是能计算出正确结果的。
这个坎还绕不过去了。查了网上有类似情形,但没有解决方法,请老师指点指点!