Calculating Averages

[Dani]

Hi,

I'm working at calculating an average from a range of cells. The range is in another excel file, and is selected from user inputs.

This is what i have so far:

Workbooks.Open Filename:=file_name
Initial = "b" & w_row
Final = "b" & counter
range(Initial & ":" & Final).Select

This is where I get stuck...do i need to store these values in an array or is there a formula to calculate the average of range(Initial & ":" & Final)

Thanks in advance,
Dani

[Tom Ogilvy]

Dim v as Double
Workbooks.Open Filename:=file_name
Initial = "b" & w_row
Final = "b" & counter
v = Application.Average(range(Initial & ":" & Final).Value)
msgbox v
' or
cells(1,1).Value = v

--
Regards,
Tom Ogilvy


"Dani" <[email protected]> wrote in message
news:[email protected]...
>
> Hi,
>
> I'm working at calculating an average from a range of cells. The range
> is in another excel file, and is selected from user inputs.
>
> This is what i have so far:
>
> Workbooks.Open Filename:=file_name
> Initial = "b" & w_row
> Final = "b" & counter
> range(Initial & ":" & Final).Select
>
> This is where I get stuck...do i need to store these values in an array
> or is there a formula to calculate the average of range(Initial & ":" &
> Final)
>
> Thanks in advance,
> Dani
>
>
> --
> Dani
> ------------------------------------------------------------------------
> Dani's Profile:
http://www.excelforum.com/member.php...o&userid=23542
> View this thread: http://www.excelforum.com/showthread...hreadid=377068
>