среднее арифметическое массива

[gsg]

здравствуйте.


подскажите, как вычислисть среднее в массиве от элемента n до элемента m.

как-то я с этим делом совсем завис...

[Stilet]

С потолка

dim i,s as integer
for i=n to m
 s=s+Массив(i);
next i
s=s/(m-n);

[gsg]

да, такой вариант понятен, но я имел в виду что-то типа:


a = Application.WorksheetFunction.Avera ge(array())

только с заданными рамками (n и m соответственно)

и без создания дополнительных массивов и циклов. такое возможно?

[IgorGO]

WorksheetFunction.Average(Range("A2:A4"))
WorksheetFunction.Average(Range(Cells(n, 1), Cells(m, 1)))