изменяемая относительная ссылка

[snowm]

как сделать так, чтобы макрос изменял относительную ссылку
что-то вроде
R[-i]C, где i некая целая переменная.
Помогите пожалуйста

[GSerg]

Как сделать, чтобы макрос изменял относительную ссылку зачем?

[snowm]

макрос просматривает ведомость товаров, разбитых на группы. в конце каждой группы есть строка, в которой должно быть итого по группе. макрос находит эту строку. мне нужно, чтобы макрос вставлял в эту строку ПРОМЕЖУТОЧНЫЕ ИТОГИ. Проблема в том, что число товаров в группе все время разное, поэтому нужно чтобы макрос сам определял диапазон суммирования относительно найденной ячейки

[mnzol]

i = 26
ActiveSheet.Range("A" & i).FormulaR1C1 = "=sum(r[-" & i - 1 & "]c:r[-1]c)"

Главное найти I!

[GSerg]

Главное найти I!

"- Как решить задачу?
- Очень просто! Для этого надо всего лишь найти ответ!"


Как строки с товарами отличаются от строк с названиями групп?

[snowm]

названий нет, итого по группе выделено голубым цветом.

[snowm]

i = 26
ActiveSheet.Range("A" & i).FormulaR1C1 = "=sum(r[-" & i - 1 & "]c:r[-1]c)"

Главное найти I!

это то я нашла. Спасибо за помощь

[snowm]

только ошибку выдает

[mnzol]

i - количество строк от верха листа, так что надо еще смещение же учитывать наверное поэтому ошибка

[mnzol]

Вернее будет написать
ActiveSheet.Range("A" & rSpisokEnd + 1).FormulaR1C1 = _
"=sum(r[-" & rSpisokend - rSpisokStart + 1 & "]c:r[-1]c)"
rSpisokStart - номер строки в которой начинается список для суммирования.
А может другая какая ошибка ...

[alibek]

Читаю и никак не пойму, зачем нужен макрос.
Это все можно сделать штатными функциями Excel.

[snowm]

i = 26
ActiveSheet.Range("A" & i).FormulaR1C1 = "=sum(r[-" & i - 1 & "]c:r[-1]c)"

Главное найти I!

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