Input Box w/Drop Down List
No, Not with a message box. You can do this using a vba userform.
Add the following to your main sub to show the form.
Public Sub Main()
UserForm1.Show
End Sub
add a combobox and commandbutton to the form with the following code.
Private Sub UserForm_Initialize()
Dim s As Worksheet
Me.ComboBox1.ListRows = Sheets.Count
For Each s In Sheets
Me.ComboBox1.AddItem s.Name, s.Index - 1
Next s
End Sub
Private Sub CommandButton1_Click()
' Call MySub(ComboBox1.Value)
Sheets(ComboBox1.Value).Activate
Unload Me
End Sub
"PMarble" wrote:
I need to have an input box launch that would provide the user with a drop
down box of selections, then upon their selection, would take then to a
certain sheet of a workbook.
I can write the macro - what is baffling me is how to program the drop down
list into the input box instead of having the user type something.
Can this be done?
|