Usar texto almacendo en variable como fórmula

Tengo una formula almacenada en un variable tipo string, con la sintaxis tal como requiero que funcione, sin embargo, cuando le indico a una celda que sea igual a esa variable o bien uso la expresión "ActiveCell.FormulaR1C1 =" me genera un error.

El código es el siguiente:

Dim i As Integer
Dim s As String
s = "IF(OR("
For i = 2 To 5
s = s & "RC[-1] =" & Range("A" & i).Value
If i < 5 Then
s = s & ";"
End If
Next i
s = s & ");RC[-2];RC[-2]*0,6)"
MsgBox (s)
Range("D1") = s

En D1 me escribe: IF(OR(RC[-1] =18000BLG;RC[-1] =18000BMD;RC[-1] =18000BSM;RC[-1] =18000BXL);RC[-2];RC[-2]*0,6)

Y obviamente no lo reconoce como formula sino como texto, si incluyo el = antes del if en la primera definición de S, inmediatamente se daña, al igual que si uso "ActiveCell.FormulaR1C1 =".