Excel 使用VBA在单元格中插入多个双引号

我有下面的公式，我想插入一个单元格，但它有多个双引号，我似乎无法使它工作。网络上有很多解决方案，但大多数都有1到2组双引号。我尝试在所有双引号上使用双引号，但它给我一个运行时错误438对象不支持此属性

下面是我要插入的公式： 以下是不起作用的代码： 以下各项应起作用（全部在一条线上）：

它看起来与您的示例相同，但这里的外观可能具有欺骗性。

在这些情况下，使用

chr（）

命令可能会有所帮助

chr（34）

返回一个双引号字符，因此下面的代码应该可以解决这个问题

ActiveSheet.Range("F18").Value = "=" & chr(34) & "Closing Costs                Current Buffer" & chr(34) & " " & chr(34) & TEXT('Closing Costs'!D32," & chr(34) & "$ 0" & chr(34) & ")"

虽然有点长，但我发现使用

chr（34）

确定报价位置有点容易

ActiveSheet.Range("F18").Value = "=""Closing Costs"" &   ""                             
Current Buffer"" & "" "" &TEXT('Closing Costs'!D32,""$ 0"")"

ActiveSheet.Range("F18").Value = "=""Closing Costs"" &   ""                             Current Buffer"" & "" "" &TEXT('Closing Costs'!D32,""$ 0"")"

ActiveSheet.Range("F18").Value = "=" & chr(34) & "Closing Costs                Current Buffer" & chr(34) & " " & chr(34) & TEXT('Closing Costs'!D32," & chr(34) & "$ 0" & chr(34) & ")"