Having a macro recognize when an option button has been select
Thanks!!
"Rowan" wrote:
You may need to edit the option button name but something like:
With Sheets("2nd Level Sources & Conv")
If .OptionButtons("Option Button 1") = 1 Then
.Range("F27").Value = "Equivalent kwh/yr"
Else
.Range("F27").Value = "Actual kwh/yr"
End If
End With
Hope this helps
Rowan
"Linking to specific cells in pivot table" wrote:
Hi,
I'm trying to an IF THEN statement which is based on which one of two option
buttons was last selected. I have two option buttons ("OptionButton1" and
"OptionButton2" -- both from the 'Forms' menu) -- basically I'm trying to
create a macro that will look at which button is currently selected (this
button will already have it's radio button showing as being selected) and
will then execute code specific to which button it finds as being last
selected. Basically, I want the following:
'If 'OptionButton1' is slected, then:
Sheets("2nd Level Sources & Conv").Range("F27").Value = "Equivalent kwh/yr"
Else
Sheets("2nd Level Sources & Conv").Range("F27").Value = "Actual kwh/yr"
End If
Thanks for your help!
Rob
|