MultiPage
15.05.2006 16:01:43
Ulf
Wie kann ich nach meinen wünschen den Zoom einer MultiPage ändern.
Es geht darum die Größe an die Auflösung des Rechners anzupassen.
zBsp. so
Private Sub UserForm_Initialize()
With UF_AAA
.Height = Application.Height
.Width = Application.Width
End With
With MultiPage1
.Zoom = Sheets(1).Range("A2").value
End With
End Sub
mfg Ulf
Anzeige