尝试插入Excel VBA公式的列

我想插入一列到我的数据表,并插入一个公式到单元格。 这个代码在这个项目上为我工作,除了这个公式:

With Data .Columns("M:M").Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove .Range("M1").FormulaR1C1 = "PROD-DESC" .Range("M2").FormulaR1C1 = "=CONCATENATE(K2," - ",L2)" .Range("M2:M" & .Cells(Rows.Count, "M").End(xlUp).Row).FillDown End With 

当我运行代码。 我得到一个不匹配的错误,它突出了连接公式的行。

任何帮助将不胜感激。 我真的很难找出为什么这不起作用。

谢谢,

G

以下将起作用(你需要加倍双引号,因为你在另一个string内 – 你还需要删除R1C1 ):

 .Range("M2").Formula = "=CONCATENATE(K2,"" - "",L2)"