userform output to procedure

  • Thread starter Thread starter shellshock
  • Start date Start date
S

shellshock

I have a procedure, where I call a userform:

Sub NewProcedure()
UserForm1.Show

The userform pops up, and I have a series of radio buttons, and als
two command buttons, OK and CANCEL. The idea is that each radio butto
corresponds to a different worksheet, where I intend to insert ne
rows, copy formulas etc. I'm just not sure how to take the radio butto
user input and output it to my procedure.

My UserForm1 code looks like this:

Public RC As Worksheet
Private ws As Worksheet

Private Sub OptionButton1_Click()
Set ws = Worksheets("Sheet1")
End Sub

Private Sub OptionButton2_Click()
Set ws = Worksheets("Sheet2")
End Sub

Private Sub OptionButton3_Click()
Set ws = Worksheets("Sheet3")
End Sub

Private Sub OK_Click()
Set RC = ws
Hide
End Sub

Private Sub CANCEL_Click()
Unload Me
End Sub

And then, back in the Sub procedure, I have:

Worksheets(RC).Activate

This doesn't work because it says the variable RC is not defined. But
thought that by defining RC as a Public variable over in the userfor
code, that RC would be recognized anywhere in the Project.

However, if I put RC into quotations, then I get a "Run-time error 9
subscript out of range".

What am I doing wrong
 
Private Sub CANCEL_Click()
Me.Hide
End Sub

and

Userform1.RC.Activate

--

HTH

RP
(remove nothere from the email address if mailing direct)
 
Thanks very much, Bob. :)

I always screw up my syntax, since I'm still quite new to VBA and
programming in general.
 
Back
Top