After a good nights sleep I tried:
activesheet.range("A:A").formula = "=b1*c1"

That's Cool......


"Jim May" wrote in message
news:zsaJf.4713$Tf3.3542@dukeread09...
On Sheet1 (activesheet) I have numbers in Range B1:C200.

In the immediate window I've entered:

Activesheet.Range("A:A").Formula = (Range("B1:B200") * Range("C1:C200"))

When I press enter I get a run-time error 13, type mismatch
Noting gets into Col A (which shoud be the product of
B * C (according to each row.

What am I doing wrong?