Recalling Multipage Form Tabs...

[Platem]

I create a simple multipage form named frmHelp with two tabs, Help and About. I assign two shortcut keys, SHFT+CTL+H and SHFT+CTL+A, to recall either of the tabs, respectively. I am trying to pass the index to MultiPage.Value so that the appropriate page can be loaded, but the value of iPage always return 'null.' Any suggestions on how this can be achieved?

Can I re-initialize the form each time as my code suggests? Thanks already. :wink:

ThisWorkbook Module:

    Public iPage as Integer
    .
    .
    Application.OnKey "+^{A}", "AboutPage"
    Application.OnKey "+^{H}", "HelpPage"
    .
    .

frmHelp Module:

Private Sub UserForm_Initialize()
    'MsgBox iPage        'DEBUG
    MultiPage1.Value = iPage
End Sub

Module 1:

Sub AboutPage()
    iPage = 1
    frmHelp.Show
End Sub

Sub HelpPage()
    iPage = 0
    frmHelp.Show
End Sub

 

[AlphaFrog]

Declare iPage at the top of Module1 and not in the ThisWorkbook module.

Module1:

[COLOR="Red"]Public iPage As Integer[/COLOR]

Sub AboutPage()
    iPage = 1
    frmHelp.Show
End Sub

Sub HelpPage()
    iPage = 0
    frmHelp.Show
End Sub

 

[Platem]

So simple... and I wasted so much time on that!

Thanks again.