Multipage zentrieren - Multipage aufpeppen
17.02.2007 10:06:00
selm
ich möchte gerne die Multipage zentrieren. Die Zentrierung sollte auf allen Bildschirmen funtionieren,
egal ob 15" oder 21", auch unabhängig der jeweiligen Bildschirmauflösung.
Derzeit nutze ich folgenden Code:
Private Sub UserForm_Activate()
With Me
.Width = Application.Width
.Height = Application.Height
End With
With MultiPage1
.Left = Me.Width / 2 - .Width / 2
.Top = Me.Height / 2 - .Height / 2
End With
End Sub
Die Zentrierung klappt auch soweit auf meinem Bildschirm 19".
Ich habe jedoch ein Label als Üerschrift (über der Multipage)
und je nach Multipage unterschiedliche viele Commandbutton (unterhalbe der Multipage)
Diese sollten entsprechend der Multipage ebenfalls an den jeweiligen Bildschirm angepasst werden.
Desweiteren eine allgemeine Frage. Wie kann ich die Multipage ein wenig aufpeppen
(Rahmen um die Multipage, Mit Effekten wir "Sunken" arbeiten, usw.)?
Wer kann mir hier weiterhelfen?
Viele Grüsse
selma
Anzeige