Помогите написать макрос для запуска формулы на основе значения в другой ячейке

Я все еще довольно начинающий пользователь VBA и очень самоучка. Я пытаюсь написать макрос, который будет использовать значение в одной ячейке для запуска макроса с формулой в другой ячейке. У меня есть макрос, который работает, но я не могу понять, как заставить его работать для диапазона ячеек. Пожалуйста, посмотрите ниже и посоветуйте, как я могу изменить это, чтобы оно срабатывало для моего диапазона O6: O26. В конечном итоге у меня будет 7 различных формул, которые можно выбрать, и, следовательно, будет больше, если целевые параметры равны в этом разделе. Это первый бит, который я хотел бы изменить, чтобы я мог заставить его работать для диапазона, а не только для одной ячейки.
Спасибо!

Подформула()
'
' Формула макроса
Установить цель = диапазон ("O6")
Если цель.Значение = "1" Тогда
Вызовите Macro1
End If
Если цель.Значение = "2" Тогда
Вызовите Macro2
End If
End Sub

_________________________________________________________________________________________
Sub Macro1 ()
'
' Макрос1 Макрос

Диапазон("P6").Выбрать
ActiveCell.FormulaR1C1 = _
"=(1.08)/(0.06+(0.08*(RC[-2])))"
'
End Sub

_____________________________________________________________________________________________
Sub Macro2 ()
'
' Макрос2 Макрос
'
Диапазон("P6").Выбрать
ActiveCell.FormulaR1C1 = _
"=(1.06)/(0.08+(0.08*(RC[-2])))"
'
End Sub