Multipage control
 

I have a multipage control on my form

Below is the macro code

Sub App()

Dim frmL2Form As UserForm1

Set frmL2Form = New UserForm1


frmL2Form.Height = 280
frmL2Form.Width = 350
frmL2Form.ScrollHeight = 900
frmL2Form.ScrollWidth = 1000
frmL2Form.KeepScrollBarsVisible = fmScrollBarsBoth
frmL2Form.PictureAlignment = fmPictureAlignmentBottomRight
frmL2Form.PictureSizeMode = fmPictureSizeModeClip

frmL2Form.Show

End Sub


The multipage height and width is greater than the form height and width

The issue is when the Multipage tab is clicked.

The form scrolltop changes to 100 eventhough I have it set
to
Private Sub MultiPage1_Change()
UserForm1.ScrollTop = 0

End Sub

Any help is greatly appreciated