Multipage form set focus

[wpryan]

Hi All, I have a multipage form in my workbook that, on the Activate event, opens to the first page with:

userform1.multipage1.value=0

This is working fine. However, on the second page I have a date field that, when entered, opens up a simple date form, with an OK and Cancel button. If either of these are pressed, I want the form to close and the focus to remain on the second page. I've tried various iterations of this code, but none of them work. The focus always goes back to the first page.

Private Sub cmdCancel_Click()
    UserForm1.txtDate = ""
    frmTxDate.Hide
    UserForm1.txtSW.SetFocus ' this text box is in the second page of the multiform.
    UserForm1.Multipage1.Value = 1
End Sub

...any ideas?

 

[wpryan]

I crossposted here, hoping for any kind of response... Multipage form set focus

 

[RoryA]

Why do you need the activate code to set the multi page to 0, when it seems that's not what you want to happen here?

 

[wpryan]

Hello, I want the form, when it initially opens, to go to index 0. Page 2 (multipage index 1) contains a date field, which on enter, opens a calendar type form. On closing the calendar form, I want the focus to remain on multipage index 1.

 

[RoryA]

By default it should load on the first page.