Propriedade Window.ZoomBehavior (Visio)
Determina o comportamento do zoom em um documento ou janela do Microsoft Visio. Leitura/gravação.
Sintaxe
expression. ZoomBehavior
Expressão Uma variável que representa um objeto Window .
Valor de retorno
VisZoomBehavior
Comentários
Para definir o comportamento de zoom para todos os novos documentos e janelas, use a propriedade DefaultZoomBehavior.
As constantes a seguir declaradas pela biblioteca de tipos do Visio no VisZoomBehavior são valores válidos para ZoomBehavior.
| Constant | Valor | Descrição |
|---|---|---|
| visZoomNone | 0 | Comportamento de zoom indefinido; use o comportamento de zoom do documento ou do aplicativo. Este é o padrão. |
| visZoomInPlaceContainer | 1 | O contêiner executará o zoom. |
| visZoomVisio | 2 | O Visio executará o zoom. |
| visZoomVisioExact | 4 | O Visio executará o zoom quando estiver aberto no local; o Visio não ajustará o nível de zoom. |
Se ZoomBehavior estiver definido como visZoomVisio, o Visio ajustará o nível de zoom a determinados valores discretos, por exemplo, 50% ou 100%, para otimizar a aparência das réguas e da grade da página e do comportamento de snap.
Se ZoomBehavior estiver definido como visZoomInPlaceContainer, o Visio usará a interface IOleCommandTarget do contêiner para executar o zoom e força um zoom adequado à janela interna. Se o contêiner não oferecer suporte a IOleCommandTarget, nenhum zoom ocorrerá.
Se ZoomBehavior estiver definido como visZoomVisioExact, você poderá definir o zoom para qualquer valor, usando a propriedade Window.Zoom ou usando o controle deslizante Zoom na interface do usuário do Visio.
Observação
O comportamento padrão (visZoomNone) é diferente do comportamento utilizado em versões anteriores ao Visio 2002. (No Visio 2002, o padrão era visZoomVisio.) Para replicar o comportamento visto em versões anteriores, defina esse valor como visZoomInPlaceContainer.
Exemplo
O procedimento a seguir mostra como definir um valor para a propriedade Document.ZoomBehavior que reproduz o comportamento do Visio 2002.
Sub ZoomBehavior_Example()
ActiveDocument.ZoomBehavior = visZoomInPlaceContainer
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.