Note: The other languages of the website are Google-translated. Back to English
Support is Online
We're back! We are here to assist you. Please be patient, we will respond to your tickets shortly.
Official support hours
Monday To Friday
From 09:00 To 17:30
New

# Help needed writing macro to run formula based on value in another cell

Friday, 17 March 2023
0 Replies
321 Visits
0
Undo
I'm still a fairly novice user of VBA and am very self taught. I'm trying to write a macro that will use a value in one cell to launch a macro which has a formula in another cell. I've got a macro that works however I can't work out how to make it run for a range of cells. Please see below and advise how i can change this so that it triggers for my range O6:O26. I will end up having 7 different formulas that can be selected and would therefore have more if targets equal options in that section. It's the first bit I'd like to change so that I can get it to work for the range rather than just the one cell.
Thank you!

Sub Formula()
'
' Formula Macro
Set target = Range("O6")
If target.Value = "1" Then
Call Macro1
End If
If target.Value = "2" Then
Call Macro2
End If
End Sub

_________________________________________________________________________________________
Sub Macro1()
'
' Macro1 Macro

Range("P6").Select
ActiveCell.FormulaR1C1 = _
"=(1.08)/(0.06+(0.08*(RC[-2])))"
'
End Sub

_____________________________________________________________________________________________
Sub Macro2()
'
' Macro2 Macro
'
Range("P6").Select
ActiveCell.FormulaR1C1 = _
"=(1.06)/(0.08+(0.08*(RC[-2])))"
'
End Sub
There are no replies made for this post yet.