Partager via


Méthode Application.DocSize (Project)

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.