View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
Patrick C. Simonds Patrick C. Simonds is offline
external usenet poster
 
Posts: 343
Default MultiPage Control

Sorry. I think what you are telling me is that which ever Page is set active
when you exit the design phase, will be the active page when ever you open
the UserForm.


"Patrick C. Simonds" wrote in message
...
I do not see that as an option.

"Peter T" <peter_t@discussions wrote in message
...
Assuming by Page1 you mean the first page whose index is 0,

Me.MultiPage1.Value = 0

But if you always want a particular 'active page' at startup just set it
in
design time.

Regards,
Peter T

"Patrick C. Simonds" wrote in message
...
Thank you that works great.

If I might though, is there any way in the UserForm Initialization to
have
page1 of the MultiPage control be active?


"Peter T" <peter_t@discussions wrote in message
...
If I follow, something like this -

Private Sub MultiPage1_Change()
Dim sShtName As String
Select Case MultiPage1.Value
Case 0: sShtName = "Sheet1"
Case 1: sShtName = "Sheet2"
Case 2: sShtName = "Sheet3"
Case Else
sShtName = Worksheets(1).Name
End Select
Application.Goto Worksheets(sShtName).Range("A1"), True

End Sub

If you want to return the current tab caption for use in a Select case

sPage = MultiPage1.Pages(MultiPage1.Value).Caption
Select Case sPage ' etc

Regards,
Peter T


"Patrick C. Simonds" wrote in message
...
I want to use a MultiPage control on a UserForm but I seem to be at a
loss
to get it to do what I want.

If I click on Tab2 (page 2 of the MultiPage control) I want code that
selects cell A1 of the Engraving worksheet. If I then click on Tab5

(page
5
of the MultiPage control) I want code that selects cell A1 of the

Trophy
worksheet. And this would be true of all 8 Tabs. I want each to bring

up
it's respective worksheet with cell A1 selected.

Is this possible?