It might be better to make code offered like this more generic, such as
adding constants for string values so that the number of customisations are
minimised. Not a big deal here, but with bigger code samples it can save
pain.
--
HTH
RP
"Chuckles123" wrote in message
...
Below is the code for a 'main macro' and code for each of two Option
Buttons.
You may find this useful in situations when you want to direct control
to either of two sections of code based upon user selection of
alternatives presented.
Public Button As String
Sub CREATE_FORM()
'
frmPricing.Show
'SHOW Pricing UserForm ON DISPLAY
'USER SELECTS BUTTON
'AFTER SELECTION, CONTROL COMES BACK HERE
If Button = "EVAL" Then
Range("A1").Select
Else
Range("C1").Select
End If
End Sub
'BELOW IS CODE FOR EACH OF 2 OPTION BUTTONS
Private Sub optEVAL_Prices_Click()
Button = "EVAL"
Unload Me
End Sub
Private Sub optBID_Prices_Click()
Button = "BID"
Unload Me
End Sub
The only missing steps are the assignment of a programmatic name and an
UserForm name to each of the Option Buttons, a Frame around the Buttons
(if so desired), and the UserForm itself.
You may find this useful in lieu of a MsgBox.
Chuckles123
--
Chuckles123
------------------------------------------------------------------------
Chuckles123's Profile:
http://www.excelforum.com/member.php...o&userid=14948
View this thread: http://www.excelforum.com/showthread...hreadid=268057