Başka bir hücredeki değere dayalı formülü çalıştırmak için gerekli yazma makrosuna yardımcı olun

Hâlâ oldukça acemi bir VBA kullanıcısıyım ve kendi kendime çok şey öğrendim. Başka bir hücrede formülü olan bir makroyu başlatmak için bir hücredeki değeri kullanacak bir makro yazmaya çalışıyorum. Çalışan bir makrom var, ancak onu bir dizi hücre için nasıl çalıştıracağımı çözemiyorum. Lütfen aşağıya bakın ve bunu O6:O26 aralığım için tetikleyecek şekilde nasıl değiştirebileceğimi önerin. Sonunda seçilebilecek 7 farklı formüle sahip olacağım ve bu nedenle o bölümde hedefler eşitse daha fazla seçeneğe sahip olacağım. Bu, tek bir hücre yerine aralık için çalışmasını sağlayabilmek için değiştirmek istediğim ilk bit.
Teşekkür ederim!

Alt Formül()
'
formül makrosu
Hedef ayarla = Aralık("O6")
Eğer target.Value = "1" ise O zaman
Macro1'i Arayın
Eğer son
Eğer target.Value = "2" ise O zaman
Macro2'i Arayın
Eğer son
End Sub

_________________________________________________________________________________________
Alt Macro1 ()
'
' Makro1 Makro

Aralık("P6").Seç
ActiveCell.FormulaR1C1 = _
"=(1.08)/(0.06+(0.08*(RC[-2])))"
'
End Sub

_____________________________________________________________________________________________
Alt Macro2 ()
'
' Makro2 Makro
'
Aralık("P6").Seç
ActiveCell.FormulaR1C1 = _
"=(1.06)/(0.08+(0.08*(RC[-2])))"
'
End Sub