Excel VBA：使用 R1C1 格式，"Application defined or object defined error"

Question

我试图创建一个引用其他单元格的公式，但我一直得到这个"应用程序定义或对象定义的错误"。我使用R1C1约定而不是Offset。

我代码:

注意:这段代码可以在任何地方，我只需要它的工作。另外，我不会这样使用代码。它用于报告工具，但这只是类似的代码(与我实际使用的)足以显示我的问题

Cells(1, 1).Value = "5/1/2014 6:30"
soiDate = "$A$1"
Cells(10, 6).Value = "6/5/2014 14:12"
Cells(10, 10).Formula = "=(R[0]C[-4]-" & soiDate & ")*24" 'Error Occurs Here 

更新:

下面的语句也不能用:

Cells(10, 10).FormulaR1C1 = "=(R[0]C[-4]-" & soiDate & ")*24"

Answer 1

试试这个:

Cells(10, 10).FormulaR1C1 = _
    "=(R[0]C[-4]-" & Range(soiDate).Address(, , xlR1C1) & ")*24"

它出错了，因为你有点混淆了R1C1对A1的引用。
为了保持一致，您可以使用Range Object address属性来转换引用。HTH .