Select Worksheet and then Reference

[helpexcel]

Hi,

I have a button that i want to add code to. When this button is clicked, a box will appear that lets the user select the worksheet they want to use. I then need to put language in similiar to ws='user slectected worksheet' so that i can import data from that worksheet.

Thanks!

 

[alansidman]

Place this code attached to your button

Dim sName As String
sName = InputBox("What Sheet to open?")
Sheets(sName).Select

 

[helpexcel]

That doesn't allow you to select another open workbook.

 

[helpexcel]

OK, this works. I just don't know how to save the selected workbook name in my code. So that ws="selected workbook"

Dim book As Workbook, sheet As Worksheet
For Each book In Workbooks
UserForm1.ComboBox1.AddItem book.Name
Next book
UserForm1.Show

 

[Fluff]

Maybe something like

Set Ws = Workbooks(ComboBox1.Value).Sheets("Sheet1")