Hallo! Ich würde dazu im Code der Userform folgendes einfügen.
Private Sub MultiPage1_Change()
If Userform1.MultiPage1.Value = 1 Then
UserForm1.Height = 750
UserForm1.Width = 1000
Else
'Ausgangsgröße
UserForm1.Height = 400
UserForm1.Width = 800
End If
End Sub
Die Seitenzählung geht bei 0 los. Im Beispiel wird beim Anklicken der Page2 die Größe der Userform geändert und bei einer anderen Seite wieder zurückgesetzt. Ggf. kannst du dann auch die Größe der Mulitpages ändern - dabei aber darauf achten, dass sie nicht größer als die Userform wird. Gruß
|