Расчет скользящей средней по изменяющемуся окну

Question

Это действительно сложная проблема для новичков. Я не могу дать всю подпрограмму. Кажется, что работает, кроме той части, где я вычисляю среднее значение. Я использовал целый набор решений, которые я нашел здесь, хотя никто не делает то, что мне нужно.

ave = WorksheetFunction.Average("C" & i, "C" & j, "C" & k, "C" & l, "C" & m, _ 
      "C" & n, "C" & o) 

Где ave длинный, а i - n - целые числа, рассчитанные на основе значения i.

Мне просто нужно взять среднее значение указанных ячеек и поместить результат в ячейку Ei. Я не могу заставить вычисление работать (ничего не происходит, даже ошибка), поэтому я не потрудился поставить результат еще. Но если бы я мог получить помощь в этом, было бы здорово.

Спасибо!

* Edit - Этот конкретный код бросает мне ошибку 1004. Но когда я использовал

Range("E" & i) = Worksheet... 

Он ничего не делал. Никаких результатов, никаких ошибок.

* Edit2 - У меня сейчас работает, спасибо! Вот код, который работает.

ave = WorksheetFunction.Average(Range("C" & i).Value, Range("C" & j).Value, _ 
       Range("C" & k).Value) 
Range("E" & i).Value = ave 

Answer 1

Это работает для меня:

ave = WorksheetFunction.Average(Range("C" & i).Value, Range("C" & j).Value,..ect)