RibbonX Custom Tab to show up upon opening

[dkesar]

I have created a ribbon from scratch and all is fine. Only two tabs and each called depending on a active worksheet. My only problem is ribbon does not show up when doc opens. No errors. I have to click on another sheet and ribbon loads. Is there any way I can correct this and have ribbon loaded immediately when doc openes? Below is code I have used to load the custom UI

Private Sub Workbook_SheetActivate(ByVal sh As Object)
    Select Case sh.CodeName
    Case "Sheet2": Call RefreshRibbon(Tag:="Cover")
    Case Else: Call RefreshRibbon(Tag:="Schedule")
    End Select

End Sub