LookUp Reset Button Anomaly

I have a Lookup that updates name from a list.

D2 =IF(LOOKUP($A$2,B:B,C:C)=",",LOOKUP($A$2,B:B,C:C)) - this Works fine

Say A2=3
C1= Name1
C2= Name2
C3= Name3

Also a macros that if D2 is typed over you can re-insert the LookUp.

Sub Reset()
For Each ce In Range("D12) 'Company
'If IsEmpty(ce) Then
ce.FormulaR1C1 = "=IF(LOOKUP(R2C1,C[-2],C[-1])=",",LOOKUP(R2C1,C[-2],C[-1]))"
ce.Font.ColorIndex = 11
'End If
Next
End Sub

The Weird thing is that in stead of putting the value from the LookUp it paste the formula
=IF(LOOKUP(R2C1,C[-2],C[-1])=",",LOOKUP(R2C1,C[-2],C[-1])) like it was text

I have used the reset on a number of numeric equations no problem, but not on a LookUp one. I've tried changing the format of the cell, but not successfully.