Using a single variable in a FormulaR1C1

[citroendealer]

This is a simplification of my problem. A1 has a number and B1 is selected. When I run this code it results in an error, why?

Sub test()
 Dim x As Single
 x = 0.5
 ActiveCell.FormulaR1C1 = "=RC[-1]*" & x
End Sub

 

[Peter_SSs]

Provided A1 contains a number and B1 is the active cell, the code does not produce an error for me. Rather, it inserts the following formula into B1:

=A1*0.5

 

[citroendealer]

When it wants to run the line with the formulaR1C1 i get "Run-time error '1004': Application-defined or object-defined error"