Excel宏计算列平均值触发语法错误，请求排查解决

我一眼就发现问题所在了——你在构建公式字符串时，嵌套的双引号没有正确转义，这直接导致了语法错误。

错误原因 #

在VBA中，字符串是用双引号包裹的。当你需要在字符串内部使用双引号（比如引用工作表名称或单元格范围时），必须写成两个连续的双引号来转义，否则VBA编译器会把中间的"Results"误以为是字符串的结束标记，进而抛出语法错误。

两种解决方法 #

方法1：正确转义双引号，保留单元格公式

把公式字符串里的内部双引号替换成两个连续双引号，这样VBA就能正确识别整个公式了：

Sheets("Calculator").Range("C15").Value = "=Average(Sheets(""Results"").Range(""C2:C1000""))"

这样设置后，C15单元格会保留=Average(Sheets("Results").Range("C2:C1000"))这个公式，后续当Results表的C列数据变化时，平均值会自动更新。

方法2：用VBA直接计算平均值，赋值数值（更高效）

如果你不需要单元格保留公式，只是需要计算后的平均值结果，可以直接用Application.Average函数计算后赋值，这样还能避免字符串转义的麻烦：

Sheets("Calculator").Range("C15").Value = Application.Average(Sheets("Results").Range("C2:C1000"))

这种方式会把计算得到的数值直接写入C15单元格，不会留下公式。

内容的提问来源于stack exchange，提问作者T.Shepherd