Hi there

I have a form that opens automatically when the file is open. It has a
combo box with a list of the worksheets that when one is selected the
worksheet opens. I used the following code:

Private Sub ComboBox1_Change()
Sheets(ComboBox1.Text).Select
End Sub

Private Sub UserForm_Activate()
For Each Sheet In ActiveWorkbook.Sheets
ComboBox1.AddItem (Sheet.Name)
Next
End Sub

It works great-- but the active cell is just the last cell used. I want it
to open with the first unlocked cell active. Can this be done, if so, how?
--
Thank-you!
Ruth