VBA向SUM函数传入变量失败，遇运行时错误'1004'求助

你的问题出在变量未正确嵌入公式字符串中：原代码里的LX被放在双引号内部，VBA会把它当作普通文本而非变量处理，Excel自然无法识别这个不存在的"LX"，从而抛出运行时错误1004。

修正后的代码 #

LR = Cells(Rows.Count, 1).End(xlUp).Row
LX = LR - 2
' 直接给单元格赋值，避免使用Select/ActiveCell（更高效稳定）
Range("B" & LX).FormulaR1C1 = "=SUM(R[-" & LX & "]C:R[-4]C)"

关键说明 #

• 用&将VBA变量LX与公式字符串拼接，让VBA先计算出LX的数值，再生成正确的R1C1格式公式。
• 去掉Select和ActiveCell操作：这两个方法容易因工作表切换、单元格选中状态变化导致错误，直接通过Range对象赋值是更可靠的写法。

内容的提问来源于stack exchange，提问作者Artiom Bic