Form unloads and closes workbook after making a selection

[davidausten]

Im using a form to make a selection from a workbook. It works fine for the first time but after you click the form and make a selection the form unloads on its own and the workbook closes. Also, if you try to open another workbook excel locks up and you have to close it with the task manager.

I need the form not to close after a selection as I intend to put a close button the form to let the user close it. Additionally I need the form and workbook up all day so the user can go back to it when they need to use it again. I intend to put a toggle button on the form to do that which I know how to do. I suspect that the combo box is where the problem lies just not sure how to fix it.

Below is all my code:

Workbook open

Private Sub Workbook_Open()
Application.Visible = False
UserForm1.Show
End Sub

Close button on the form:

Private Sub CommandButton1_Click()
Application.Visible = True
Unload Me
End Sub

Form Initialize:

Private Sub UserForm_Initialize()
With UserForm1.ComboBox1
     .AddItem "Flat Payment"
     .AddItem "Duplicate Payment Invoice"
     .AddItem "Duplicate Payment Statement"
     .AddItem "Tax"
     .AddItem "Dispute Tax"
     .AddItem "Courtesy Adjustment"
     .AddItem "Added Payment to Misdirected"
     .AddItem "Transfer Portion of Payment"
     .AddItem "Transfer Payment Auto Lockbox"
     .AddItem "Transfer Payment Non Postables"
     .AddItem "Transfer Payment Related"
     .AddItem "Transfer Credit"
     .AddItem "Remit Request"
     .AddItem "Insufficient Remit"
     .AddItem "Transposition Error"
     .AddItem "Short Payment"
     .AddItem "Over Payment"
     .AddItem "Assigned to Staples"
End With
End Sub

Combo box where user makes selection at which point the form closes along with the workbook:

Private Sub ComboBox1_Change()
Sheet1.Activate
Dim Decide As Integer
    Decide = Me.ComboBox1.ListIndex + 2
   
    Sheet1.Range("I" & Decide).Copy
   
End Sub

+-

 

[davidausten]

it works fine and the form stays put if the workbook isnt hidden on open or hidden at all

 

[davidausten]

i should clarify that when the form open on the workbook open event it works as expected that is hides the workbook and only the form shows which is what I want. But if you click outside the form excel and the form closes.