userform output to procedure

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
 
B

Bob Phillips

Private Sub CANCEL_Click()
Me.Hide
End Sub

and

Userform1.RC.Activate

--

HTH

RP
(remove nothere from the email address if mailing direct)
 
S

shellshock

Thanks very much, Bob. :)

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

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top