First, forgive the Repost. I didn't get any replies over the weekend.

I am trying to get the horizontal scroll bar on a MultiPage page to work. I
have a main MultiPage (MultiPage1). On each page of the main MP there is
another (sub-) MultiPage (i.e. MultiPage2 is on Page1 (index 0) of
MultiPage1). The following code works to insert Horizontal Scroll Bars on the
correct page (of the sub- MultiPage) and with the correct horizontal scroll
range, but nothing I do will affect the ScrollLeft Property. (I've included 3
examples of what I have tried - none of them do anything.) I do not get any
kind of errors, just a scroll bar that is positioned wherever excel wants it
(usually about 1/8 of the way from the left edge). As a note, I have tried a
Me.Repaint at the end of the Sub with no effect. I have many of these pages
that are created programmatically and it is not possible to set them manually.

Thanks in advance for any help!!

Private Sub UserForm_Initialize()
hWnd = FindWindow(vbNullString, Me.Caption)
SetWindowLong hWnd, -16, &H84CE0080
MultiPage2.Pages(0).ScrollBars = fmScrollBarsHorizontal
MultiPage2.Pages(0).KeepScrollBarsVisible = fmScrollBarsHorizontal
MultiPage2.Pages(0).ScrollWidth = 805
MultiPage2.Pages(0).ScrollLeft = MultiPage2.Pages(0).ScrollWidth _
- MultiPage2.Width
MultiPage2.Pages(0).ScrollLeft = 0
MultiPage2.Pages(0).ScrollLeft = MultiPage2.Width / 2
End Sub