带引号哈希标记的.FormulaR1C1格式

Question

我正在编写一些VBA代码，将一些公式写入excel电子表格。如果函数包含井号“＃”，则存在编译错误。这是我的代码：

Sheets("CleanedData").Range("B2:B2").Offset(0, a - 1).FormulaR1C1 = 
   "=SUM(IF(LEFT(Collation!C, 1)=" # ", 1, 0))"

当我编写此行时，编辑器报告编译错误“Expected：end of statement”。

Answer 1

对于输出：=SUM(IF(LEFT(Collation!C, 1)="#", 1, 0))，您需要通过加倍来转义字符串中的"：

.FormulaR1C1 = "=SUM(IF(LEFT(Collation!C, 1)=""#"", 1, 0))"