Méthode Windows.Arrange (Visio)

Organise les fenêtres dans une collection Windows .

Syntaxe

expression. Arrange( _nArrangeFlags_ )

Expression Variable qui représente un objet Windows .

Parameters

Nom Requis/Facultatif Type de données Description
nArrangeFlags Facultatif Variant Indicateur spécifiant comment disposer les fenêtres. Par défaut, les fenêtres sont disposées verticalement.

Valeur renvoyée

Aucune

Remarques

Appeler la méthode Arrange revient à cliquer sur Réorganiser tout dans le groupe Fenêtre de l’onglet Affichage. La fenêtre active reste active.

Visio prend en compte les fenêtres de haut en bas, puis de gauche à droite. Vous pouvez choisir les fenêtres qui seront disposées au dessus lors d'une disposition en mosaïque horizontale (ou celles qui se trouveront placées le plus à gauche lors d'une disposition en mosaïque verticale) en effectuant une disposition préalable des fenêtres.

Les constantes suivantes déclarées dans la bibliothèque de types Visio sont des valeurs valides pour nDispositionIndicateurs. Ces constantes sont également déclarées par la bibliothèque de types Visio dans VisWindowArrange.

Constante Valeur
VisArrangeTileVertical 1
VisArrangeTileHorizontal 2
VisArrangeCascade 3

Exemple

La macro suivante indique comment activer et disposer des fenêtres.

 
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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.