Evgeniy, Можно так: формулу в ячейку, значение в переменную, из переменной обратно в ячейку
Муторно но работает
[vba]Код
Sheets(1).[L7] = "=SUM(R[2]C)"
Val1 = Sheets(1).[L7].Value
Sheets(1).[L7] = Val1
Sheets(1).[L9] = "=SUM(R[2]C,R[31]C)"
Val2 = Sheets(1).[L9].Value
Sheets(1).[L9] = Val2
Sheets(1).[L11] = "=R[7]C+R[26]C+R[13]C"
Val3 = Sheets(1).[L11].Value
Sheets(1).[L11] = Val3
Sheets(1).[L16] = "=ROUND(RC[-7]+RC[-4]+RC[-3]+RC[-2]+RC[-1],0)"
Val4 = Sheets(1).[L16].Value
Sheets(1).[L16] = Val4
'и т.д.
[/vba]