excel - 带引号的公式中的预期语句结束

Question

这个问题已经有答案了:

How do I put double quotes in a string in vba? (5 个回答)

已关闭 去年。

Sub FillNames()

Range("D2:D56").SpecialCells(xlCellTypeBlanks).Formula = _
    "=IF(AND(C>800,C<900),  "YES", "NO")"

End Sub

我收到预期的编译错误:语句结束。 YES 和 NO 周围的引号似乎有问题。

如果我删除 YES 和 NO 周围的引号并运行宏，它将运行并将公式引号中的内容打印到单元格中。我不明白引号如何导致语法错误。

我正在运行 Excel 2011 for Mac，不知道这是否与此有关。

Answer 1

字符串中的双引号需要通过加倍来转义:

Range("D2:D56").SpecialCells(xlCellTypeBlanks).Formula = _
                    "=IF(AND(C>800,C<900),  ""YES"", ""NO"")"