Freigeben über


Beispiel für ScrollHeight-, ScrollLeft-, ScrollTop-, ScrollWidth-Eigenschaft

Im folgenden Beispiel wird eine Seite einer MultiPage als Bildlaufbereich verwendet. Der Benutzer kann die Bildlaufleisten auf der Seite "Page2" des MultiPage -Steuerelements verwenden, um Zugriff auf Teile der Seite zu erhalten, die ursprünglich nicht angezeigt werden.

Sie können dieses Beispiel verwenden, indem Sie diesen Beispielcode in den Deklarationsabschnitt eines Formulars kopieren. Stellen Sie sicher, dass das Formular ein MultiPage -Steuerelement mit der Bezeichnung "MultiPage1" enthält und dass jede Seite im MultiPage -Steuerelement ein oder mehrere Steuerelemente enthält.

Hinweis

Jede Seite einer MultiPage ist eindeutig. Page1 verfügt über keine Bildlaufleisten. Page2 verfügt über horizontale und vertikale Bildlaufleisten.

Private Sub UserForm_Initialize() 
 MultiPage1.Pages(1).ScrollBars = fmScrollBarsBoth 
 MultiPage1.Pages(1).KeepScrollBarsVisible = _ 
 fmScrollBarsNone 
 
 MultiPage1.Pages(1).ScrollHeight = 2 * _ 
 MultiPage1.Height 
 MultiPage1.Pages(1).ScrollWidth = 2 * _ 
 MultiPage1.Width 
 
 'Set ScrollHeight, ScrollWidth before setting 
 'ScrollLeft, ScrollTop 
 MultiPage1.Pages(1).ScrollLeft = _ 
 MultiPage1.Width / 2 
 MultiPage1.Pages(1).ScrollTop = _ 
 MultiPage1.Height / 2 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.