Cells(какая нибудь ячейка).FormulaR1C1 = "=SUM(Твой диапазон)"
а потом считай эту ячейку
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший
