Помогите тупому чайнку написать макрос для Excel....

[ilit2008]

Помогите пожалуйста написать макрос для экселя......абсолютно не понимаю макросы......

Имеется столбец чисел неизвестной заранее высоты. Найти сумму тех элементов столбца, значения которых находятся в заданном диапазоне [X1, X2]. Числа X1 и X2 записаны в ячейки B1 и B2 соответственно. Результат записать в ячейку B3.

Как я поняла с столбце А записаны именно те значения которые надо проанализировать....



Заранее премного благодарна!!!

[EducatedFool]

Код: Выделить всё

[color=darkblue]Sub[/color] ОченьСложныйМакрос()
    [b3] = Application.Sum(Range([a:a].Cells([b1]), [a:a].Cells([b2])))
[color=darkblue]End[/color] [color=darkblue]Sub[/color]

Пример файла:

[ilit2008]

я понимаю если две строки, а вот если у меня столбец из 100 напиример чисел и мне надо сложить только те, которые будут больше числа записанного в ячейке В1 но меньше числа в ячейке В2. Он должен выбрать еще что суммировать.Вот что мне нужно.

[EducatedFool]

мне надо сложить только те, которые будут больше числа записанного в ячейке В1 но меньше числа в ячейке В2

В исходном задании было написано совершенно другое.
Как было написано - так и сделал.

Он должен выбрать еще что суммировать

В следующий раз будете конкретнее формулировать задачу, и прикреплять пример файла, если захотите получить сразу готовое решение.

[ilit2008]

ничего страшного........все равно спасибо за помощь...

[EducatedFool]

Ну в этом случае можно и так:

Код: Выделить всё

[color=darkblue]Sub[/color] ОченьСложныйМакрос()
    [b3].FormulaLocal = "=СУММПРОИЗВ(A1:A10000*(A1:A10000>$B$1)*(A1:A10000<$B$2))": [b3] = [b3]
[color=darkblue]End[/color] [color=darkblue]Sub[/color]

Изначально я неправильно понял задание - думал про диапазон ячеек, а не про диапазон чисел.

[ilit2008]

Спасибо большое!!!!!!