Méthode Application.DocSize (Project)

Article
04/07/2023

Définit la largeur et la hauteur de la fenêtre active.

Syntaxe

expression. DocSize( _Width_, _Height_, _Points_ )

expressionUne variable qui représente un objetApplication.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
Width	Facultatif	Long	Nombre qui indique la nouvelle largeur de la fenêtre active.
Height	Facultatif	Long	Nombre qui indique la nouvelle hauteur de la fenêtre active.
Points	Facultatif	Boolean	Cet argument a la valeur True si Width et Height sont mesurés en points. False s'ils sont mesurés en pixels. La valeur par défaut est False.

Valeur renvoyée

Boolean

Exemple

L’exemple suivant montre comment afficher les fenêtres des projets ouverts verticalement dans la fenêtre principale de Project.

Sub TileProjectWindowsVertically() 
 
    Dim I As Long   ' Index used in For...Next loop 
     
    For I = 1 To Application.Windows.Count 
        Windows(I).Activate 
        DocSize Width:=UsableWidth / Windows.Count, Height:=UsableHeight, Points:=True 
        DocMove XPosition:=(I - 1) * UsableWidth / Windows.Count, YPosition:=0, Points:=True 
    Next I 
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.

Partager via