Enter formula in Cell

[Pingvinfan]

Hi!

As a part of a macro im trying to run I would like to enter a forumla in a cell.

After selecting a cell, lets say D1. I would like to enter "=80000-sum(DVALUE:D152)"

Where VALUE is an Integer previously calculated in the macro.

Thx in advance

Regards

P

 

[Richard Schollar]

Hi

'assume intRow holds your row value then:
 
Range("D1").Formula = "=80000-sum(D" & intRow & ":D152)"

 

[Pingvinfan]

Worked great! Thanks