Workbook_Open Sub regularly does not follow the instructions

[JeffGrant]

Hi All, I have this very simple sub in the ThisWorkbook object.

Option Explicit
Private Sub Workbook_Open()
    'Check last row count to determine risk levels
    Sheet5.Select
    lrow = Cells(Rows.Count, 1).End(xlUp).Row
    If lrow > 1000 Then
        MsgBox "You need to review formulas in DNCHY2 for risk levels"
    End If

    Application.Visible = False: frm_Login.Show
    Application.WindowState = xlMaximized
    LoginInstance = 0

    'Set the default import file in case it was changed at the last session
    Sheet1.Range("e41").Value = "Main-Report.csv"

    'clear previous error in race tracks
    Sheet25.Range("O2").Value = ""

End Sub

For some reason, on a regular basis, the workbook does not open on Sheet 5 as instructed. It opens on any other sheet, and usually the sheet that I do not want users to see.

These variables are declared elsewhere.
Public LoginInstance as Integer
Public lrow as Double.

What am I missing?

Thanks in advance

Jeff.

 

[cmowla]

The code:

Sheet5.Select

will select the sheet whose codename is Sheet5. But the name of the sheet tab may be something different:

Are both the Sheet Name and Sheet code name the same for sheet 5? If so, then most likely the userform,

frm_Login.Show

could be changing the active sheet somehow. So I would put another Sheet5.Select at the end of the sub.

 

[JeffGrant]

hmmm..great thought cmowla. I will look into that. I didn't think of that. I only ever used sheet codename in my code because that solves a whole heap of referencing issues

just checked.... on the money cmowla. in the userform_active sub there is

    Set sh = ThisWorkbook.Sheets("User_Management")
    sh.Visible = xlSheetVisible

which is one of the forms that opens up in the background.

What I don't understand though, is why this happens regularly, but not always? I don't want users to see this sheet at all.

Any suggestions?

 

[Jimmypop]

Hi there

What happens if you change

Sheet5.Select

to

Sheet5.Activate

 

[RoryA]

If you don't want users to see it, why are you making it visible?