View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.charting
Cinco Cinco is offline
external usenet poster
 
Posts: 29
Default Need to re-initialize cell with original formula

During an initialization process, I need to reset some cells to their
original formula(s). I tried the following w/o success. The cell contents
show as text afterwards rather than formulas. Help.
Jim

' Reset Session formulas to Full Night
Dim SessionCompareE3 As String
Dim SessionCompareF3 As String

SessionCompareE3 = "=COUNTIF(D8:D25000,"" ""&B1)"
Range("$E$3").Select
ActiveCell.FormulaR1C1 = SessionCompareE3
SessionCompareF3 = "=COUNTIF(D8:D25000,"" < ""&C2)"
Range("$F$3").Select
ActiveCell.FormulaR1C1 = SessionCompareF3