在VBA Excel中编写公式

我在Excel VBA中编写公式时遇到麻烦。

Sub Macro() valueA1 = Range("A1").Value Range("C1").Formula = "=RC[-1]*" & valueA1 End Sub 

最后我希望单元格C1中的公式写成=B1*0,5 ，如果B1中的值是0,5 。

Thaks的帮助！

Answer 1

Excel不喜欢外语。 您将需要使用FormulaR1C1Local ：

 Range("C1").FormulaR1C1Local = "=RC[-1]+" & valueA1 

或者可能

 Range("C1").FormulaR1C1Local = "=RC[-1]*" & valueA1 

如果你试图乘以B1 * A1。 （你的问题说多了，你的代码说添加。）

这应该导致它接受"0,5"作为有效的数字。