如何在插入公式时使用变量

Question

此代码有效

ActiveCell.FormulaR1C1 = "='[2019 Comm Tables.xlsx]table-ZZ'!R5C8"

我想用变量中的值替换硬编码的ZZ（工作表名称的一部分）

我有

Dim avar as string
avar ="AA"
ActiveCell.FormulaR1C1 = "='""[2019 Comm Tables.xlsx]table-"" & avar &  "" '!R5C8"""

这会生成

  

“对象定义错误”

我们会很高兴收到任何有关解决我的编码错误的帮助

Answer 1

您不需要将双引号加倍，除非您在要引用的字符串的开头有双引号。

   Dim avar As String
    avar = "AA"
    ActiveCell.FormulaR1C1 = "='[2019 Comm Tables.xlsx]table-" & avar & "'!R5C8"

另外，在单引号前您的空格太多。

细节很重要。

Answer 2

尝试一下：

ActiveCell.FormulaR1C1 = "='[2019 Comm Tables.xlsx]table-" & avar & "'!R5C8"