Question

我正在尝试在我的数据表中插入一个列并将公式插入到单元格中。除了这个公式之外，这个代码对我来说很有用：

     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

当我运行代码时。我得到一个不匹配的错误，并用连接公式突出显示该行。

非常感谢任何帮助。我真的在努力弄清楚为什么这不起作用。

谢谢，

Answer 1

以下内容适用（您需要将双引号加倍，因为您在另一个字符串中 - 您还需要删除R1C1）：

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

尝试插入带有Excel VBA公式的列

1 个答案: