FormulaArray不断变为相对参考



我正在尝试使用VBA进入表格中的公式(供以后在Excel求解器中使用(。直到今天早上它都很好。

For u = 1 To Row2
            Sheets("Testa").Cells(u + 1, 14).FormulaArray = "=SUM(IF(B2:B2000=" & CStr(u) & ",F2:H2000,0))"
        Next
For v = 1 To Row
            Sheets("Testa").Cells(v + 1, 18).FormulaArray = "=SUM(IF(A2:A2000=" & CStr(v) & ",F2:H2000,0))"
        Next

第一个循环将其作为单元格中的结果:" = sum(if(rc [-12]:R [1998] C [-12] = 1,RC [-8]:R [1998] C[-6],0((",将绝对引用更改为相对引用,而不将功能转化为法语等效物。第二个循环效果很好。A和B列包含一个看起来像这样的数字列表(从1到Row2(:

1 1
1 2
1 3
2 1
2 2
2 3
3 1
3 2
3 3

我不知道我缺少什么。欢迎任何帮助!

我编写的公式的范围是作为文本范围设置的,解释了为什么它不计算公式。将其手动更改为标准范围解决了问题。

最新更新