Exemplo das propriedades ScrollHeight, ScrollLeft, ScrollTop, ScrollWidth

O exemplo a seguir usa uma página de uma MultiPage como uma região de rolagem. O usuário pode usar as barras de rolagem na Página2 do MultiPage para obter acesso a partes da página que não são exibidas inicialmente.

Para usar este exemplo, copie esta amostra de código para a parte Declarações de um formulário. Certifique-se de que o formulário contenha uma MultiPage chamada MultiPage1 e que cada página de MultiPage contenha um ou mais controles.

Observação

Cada página de um MultiPage é exclusiva. A página1 não tem barras de rolagem. A página2 tem barras de rolagem horizontais e verticais.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.

  • Last updated on