Multipage control

S

Suhas

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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top