Пример использования свойств ScrollHeight, ScrollLeft, ScrollTop и ScrollWidth

В следующем примере страница MultiPage используется в качестве области прокрутки. Полосы прокрутки на странице Page2 объекта MultiPage можно использовать для получения доступа к частям страницы, которые изначально не отображались.

Чтобы воспользоваться этим примером, скопируйте данный пример кода в раздел описаний формы. Убедитесь, что форма содержит объект MultiPage с именем MultiPage1, а каждая страница объекта MultiPage содержит один или более элементов управления.

Примечание.

Каждая страница объекта MultiPage уникальна. На странице Page1 отсутствуют полосы прокрутки. На странице Page2 есть горизонтальные и вертикальные полосы прокрутки.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.