Partager via


Méthode Application.BoxStylesEdit (Project)

Définit le style des cases de l’affichage Réseau de tâches.

Syntaxe

expression. BoxStylesEdit( _Style_, _DataTemplate_, _HorizontalGridlines_, _VerticalGridlines_, _BorderShape_, _BorderColor_, _BorderWidth_, _BackgroundColor_, _BackgroundPattern_ )

expressionUne variable qui représente un objetApplication.

Paramètres

Nom Requis/Facultatif Type de données Description
Style Obligatoire Long Style de case à modifier. Il peut s’agir de l’une des constantes PjBoxStyle .
Datatemplate Facultatif String Nom du modèle de données à utiliser pour le style.
HorizontalGridlines Facultatif Boolean Renvoie la valeur True si un quadrillage horizontal sépare les différentes lignes de la case. False dans le cas contraire.
VerticalGridlines Facultatif Boolean Renvoie la valeur True si un quadrillage vertical sépare les différentes lignes de la case ; False dans le cas contraire.
BorderShape Facultatif Long Forme de la bordure de la case. Il peut s’agir de l’une des constantes PjBoxShape .
BorderColor Facultatif Long Couleur de la bordure de la case. Il peut s’agir de l’une des constantes PjColor .
BorderWidth Facultatif Long Valeur comprise entre 1 et 4 qui spécifie la largeur de la bordure de la case, exprimée en pixels.
BackgroundColor Facultatif Long Couleur d’arrière-plan de la case. Il peut s’agir de l’une des constantes PjColor .
BackgroundPattern Facultatif Long Motif de l’arrière-plan. Il peut s’agir de l’une des constantes PjBackgroundPattern .

Valeur renvoyée

Boolean

Remarques

Pour afficher la boîte de dialogue Styles de boîte de dialogue, utilisez la méthode BarBoxStyles .

Pour modifier les lignes de lien de zone où les couleurs peuvent être des valeurs RVB, utilisez la méthode BoxStylesEditEx .

Exemple

L’exemple suivant montre comment modifier les cases avec affichage du style pjBoxCritical pour afficher des rectangles arrondis, ajouter des quadrillages verticaux et définir la couleur des bordures et la couleur d’arrière-plan.

Sub BoxStyles_Edit() 
 'Activate the Network Diagram view 
 ViewApply Name:="Network Diagram" 
 
 BoxStylesEdit Style:=pjBoxCritical, BorderShape:=pjBoxRoundedRectangle, VerticalGridlines:=True, _ 
 BorderColor:=pjRed, BorderWidth:=3, _ 
 BackgroundColor:=pjGray, BackgroundPattern:=pjBackgroundLightDither 
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.