View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Frank Kabel Frank Kabel is offline
external usenet poster
 
Posts: 3,885
Default Error when using macro to write formula to cell

Hi
try
ActiveCell.FormulaR1C1 = "=IF(RC[-7]<0.25,"""",RC[-7]-TIME(0,16,0))"

--
Regards
Frank Kabel
Frankfurt, Germany


Patti wrote:
When typed directly in cell L11, this formula does what I want:
=IF(E11<0.25,"",E11-TIME(0,16,0))

When I go to the Immediate Window and type ? range
("L11").FormulaR1C1, the following is returned:
=IF(RC[-7]<0.25,"",RC[-7]-TIME(0,16,0))

So I tried to create a procedure using that -

Range("L11").Activate
ActiveCell.FormulaR1C1 = "=IF(RC[-7]<0.25,"",RC[-7]-TIME(0,16,0))"

... and get the error "Run-time error '1004': Application-defined or
object-defined error"

Can anyone tell me what I am doing wrong?

TIA, Patti