see if this helps
ActiveCell.FormulaArray = "=AVERAGE(IF(L1:L3<0,L1:L3))"
--
Don Guillett
SalesAid Software

"referencing ranges in formulas" <referencing ranges in
wrote in message
...
I have the following codes in my worksheet

=average(range) (1)

and I would like to replace them with

{=average(if(range<0,range,""))}. (2)

How do I extract the range from (1) so that I input it in (2)?

Basically, I am substituting a regular average funcion with an array
formula
that averages by excluding zero values in the range.

Thansk,
Mira