View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Steve[_4_] Steve[_4_] is offline
external usenet poster
 
Posts: 184
Default List sheet names in "pop-up" box for users to select

Ok, So I figured out how to add and populate a combobox...but the code fires as soon as the selection is made. How do I suspend the code until the OK button is clicked? I thought I was being smart by choosing ComboBox1_DropButtonClick, but that gave me an error!

Here's what I have:

Private Sub ComboBox1_Click()

gsWksTargetName = ComboBox1.List(ComboBox1.ListIndex)
Unload Me

End Sub

Private Sub UserForm_Initialize()

Dim wks As Worksheet
For Each wks In ThisWorkbook.Sheets
If wks.Visible Then ComboBox1.AddItem wks.Name
Next 'wks
Me.Caption = "Select Target"

End Sub