VBA и Excel. Прибавление одного и того же числа к диапозону строк.

Формулировка задачи:

Здравствуйте,
Хочу несколько оптимизировать свою программу... У меня есть база данных, состоящая из чисел - и необходимо к определенному диапазону строк прибавить одно и то же число.
Раньше я построчно прибавлял к содержимому строки это число, что не эффективно - можно же как то одной командой это сделать... Только я этого не знаю...
За ранее спасибо, Эриксон Артем.

Решение задачи: «VBA и Excel. Прибавление одного и того же числа к диапозону строк.»

textual
                            Листинг программы 
                        
                            Worksheets(<font color="darkblue"><b>1</b></font>).Range(p2).Formula = CCur(Worksheets(<font color="darkblue"><b>1</b></font>).Evaluate(Range(p2).Address & <font color="teal">"+"</font> & CStr(Replace(sum,<font color="teal">","</font>,<font color="teal">"."</font>))))