View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Chip Pearson Chip Pearson is offline
external usenet poster
 
Posts: 7,247
Default Error when using macro to write formula to cell

Patti,

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

Note that additional quotes inside the formula.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Patti" wrote in message
...
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