Exemplo das propriedades ScrollHeight, ScrollLeft, ScrollTop, ScrollWidth

O exemplo seguinte utiliza uma página de uma Página Múltipla como uma região de deslocamento. O utilizador pode utilizar as barras de deslocamento na Página2 do MultiPage para obter acesso a partes da página que não são apresentadas 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 contém uma MultiPage com o nome MultiPage1 e de que cada página do MultiPage contém um ou mais controlos.

Observação

Cada página de uma Página Múltipla é exclusiva. A Página1 não tem barras de deslocamento. A Página2 tem barras de deslocamento 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.