Ik ben nog steeds een vrij beginnende gebruiker van VBA en ben erg autodidact. Ik probeer een macro te schrijven die een waarde in één cel gebruikt om een ​​macro te starten met een formule in een andere cel. Ik heb een macro die werkt, maar ik kan er niet achter komen hoe ik hem voor een reeks cellen moet laten werken. Zie hieronder en adviseer hoe ik dit kan wijzigen zodat het wordt geactiveerd voor mijn bereik O6: O26. Ik zal uiteindelijk 7 verschillende formules hebben die kunnen worden geselecteerd en zou daarom meer hebben als doelen gelijke opties in die sectie hebben. Het is het eerste bit dat ik zou willen veranderen, zodat ik het kan laten werken voor het bereik in plaats van alleen voor één cel.
Dank je!

Subformule()
'
' Formule Macro
Doel instellen = Bereik ("O6")
Als target.Value = "1" Dan
Bel Macro1
End If
Als target.Value = "2" Dan
Bel Macro2
End If
End Sub

_________________________________________________________________________________________
Sub Macro1 ()
'
' Macro1 Macro

Bereik("P6").Selecteer
ActiveCell.FormuleR1C1 = _
"=(1.08)/(0.06+(0.08*(RC[-2])))"
'
End Sub

_____________________________________________________________________________________________
Sub Macro2 ()
'
' Macro2 Macro
'
Bereik("P6").Selecteer
ActiveCell.FormuleR1C1 = _
"=(1.06)/(0.08+(0.08*(RC[-2])))"
'
End Sub