I have these three macros to select worksheets in a workbook. On the start page (sheet1) is a command button that the user click to activate the macros.

Public Sub ShowOwnersTruckSettlement()
frmSettlementSelect.Show
End Sub

Which brings up a userform and activates this macro.

Private Sub UserForm_Initialize()
For Each SH In Worksheets
If SH.Name = "StartPage" Or SH.Name = "Truck Inventory" Or _
SH.Name = "DataSheet" Or SH.Name = "Truck Settlement Template" Or _
SH.Name = "Report" Or SH.Name = "Driver Pay Template" Then
Else
frmSettlementSelect.cboSheetName.AddItem (SH.Name)
End If
Next
End Sub

After the user selects the worksheet and clicks the "OK" command button this macros runs:

Private Sub cmdOK_Click()
SheetSelected = frmSettlementSelect.cboSheetName
Worksheets(SheetSelected).Select
Range("A1").Select
Unload Me
End Sub

Here's the problem: after the sheet is selected and you try to type any information into any cell the information ends up on the start page (sheet 1). Example: User selects sheet2 and in cell A1 user types "Something". "Something" will appear on the start page (sheet1). It has been awhile since I have written macros, about 7 years. But before that I wrote several macros in previous versions of Excel. But this is the first time I have written any macros in Excel 2013. I have opened up some of my old workbooks, mostly written in Excel '97 and do NOT have this problem. Has something changed? I am at a lost?

Thanks