Método Windows.Arrange (Visio)

Organiza as janelas em uma coleção do Windows .

Sintaxe

expression. Arrange( _nArrangeFlags_ )

Expressão Uma variável que representa um objeto Windows .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
nArrangeFlags	Opcional	Variantes	Um sinalizador que especifica como organizar as janelas; por padrão, as janelas são organizadas verticalmente.

Valor de retorno

Nada

Comentários

Usar o método Arrange é equivalente a clicar em Colocar lado a lado no grupo Janela, na guia Exibição. A janela ativa permanece ativa.

O Visio considera janelas de cima para baixo e, em seguida, da esquerda para a direita. Você pode influenciar que janelas terminarão na parte mais elevada ao colocar lado a lado horizontalmente (ou mais à esquerda ao colocar lado a lado verticalmente) pré-organizando as janelas.

As seguintes constantes declaradas pela bilbioteca de tipos do Visio são valores válidos para nArrangeFlags. Essas constantes também são declaradas pela biblioteca de tipos do Visio no VisWindowArrange.

Constant	Valor
VisArrangeTileVertical	1
VisArrangeTileHorizontal	2
VisArrangeCascade	3

Exemplo

A seguinte macro mostra como ativar e organizar as janelas.

 
Public Sub Arrange_Example() 
 
 Dim vsoDocument As Visio.Document 
 Dim vsoWindow As Visio.Window 
 Dim vsoWindow2 As Visio.Window 
 
 'Create two new windows by adding documents. 
 Set vsoDocument = Documents.Add("") 
 Set vsoWindow = ActiveWindow 
 Set vsoDocument = Documents.Add("") 
 
 'Use the Arrange method to tile the windows 
 '(currently the last opened window is active). 
 Windows.Arrange 
 
 'Use the Activate method to make the other 
 'window the active window. 
 vsoWindow.Activate 
 
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.