A value based on OptionButton selection
the concept is the same - qualify your range reference. See example below.
Set C = WorkSheets("Somesheetname").Range("h16")
--
Regards,
Tom Ogilvy
"Sony" wrote:
I want to do this based on other information, I will provide a sample of my
code that is tied to a command button. My UserForm contains this command
button, as well as a Textbox & an OptionButton.
Private Sub CommandButton1_Click()
Dim Msg, Style, Title, Response
Msg = "Request Denied"
Style = vbYesNo + vbCritical + vbSubReq
Title = "Request Denied"
Response = MsgBox(Msg, Style, Title)
If Response = vbYes Then
ActiveWorkbook.SendMail "), ("Request Denied")
MsgBox ("The Denied Notification has been sent")
Sheets("Request").Range("f7").Value = TextBox1
If OptionButton1.Value = "True" Then
Set C = Range("h16")
C.Sheet ("Request")
C.Value = "Denied"
Unload Me
End If
Else
MsgBox "Send operation aborted."
Unload Me
End If
End Sub
--
Sony
"Tom Ogilvy" wrote:
in the control source property of the option button put in
sheet1!B9
as an example.
--
Regards,
Tom Ogilvy
"Sony" wrote:
I have a Userform that has several fields that are then populated on various
cells. What I have a question about is I have 3 optionbuttons that I want to
tie to a specifc cell on another sheet.
Example, open Userform from Sheet 2, OptionButton1 is selected (True) then I
want "Denied" placed in a specific cell on Sheet 1.
My userforms work correctly with the exception of placing my comment when
the optionbutton is true.
Thank you in advance for your help.
--
Sony
|