Your description doesn't make sense to me, but here is what you said
.FormulaR1C1 = "=IF(RC[-3]="""","""",RC[-1]-RC[-3])"
--
HTH
Bob Phillips
(remove nothere from the email address if mailing direct)
> I have the follwing code which sets a formaula in a specific column
>
[quoted text clipped - 7 lines]
> function which says that if the [-3] column is blank then return a zero as
> the result