You need

Range("B1").Formula = "=AVERAGE("A1:A10")"

that is a string, not a range object

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"pippo&menelao" wrote in message
...
Hi all,
here's my problem.
I want to apply a function (ex: average) on a range of data.
So I wrote:

Dim A as Range
Set A = Range("A1:A10")
Range("B1").FormulaR1C1 = "=AVERAGE(A)"

but it's wrong (#NAME? as error).
I tried with "FormulaLocal" and "Formula", but
is always wrong.

I want to use a range because the range will change every day.

How can I do ?

Thanks a lot
sincerely