Classe ChartBorder (Word VBA)

Cet objet représente la bordure d'un objet.

Set

Pour utiliser une variable de classe ChartBorder, elle doit d'abord être instanciée, par exemple

Dim cbr as ChartBorder
Set cbr = ActiveDocument.Background.Chart.DataTable.Border

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe ChartBorder : Axis.Border, DataTable.Border, DropLines.Border, ErrorBars.Border, Gridlines.Border, HiLoLines.Border, LeaderLines.Border, Series.Border, SeriesLines.Border, Trendline.Border et UpBars.Border

Color

Cette propriété renvoie ou définit la couleur principale de l'objet.

ActiveDocument.Background.Chart.DataTable.Border.Color =

ColorIndex

Renvoie ou définit la couleur de la bordure.

Valeurs possibles sont xlColorIndexAutomatic - Couleur automatique, xlColorIndexNone - Aucune couleur.

La couleur est spécifiée sous la forme d'une valeur d'index dans la palette de couleurs actuelle ou en tant que l'une des constantes XlColorIndex suivantes :

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 With .Chart.Axes(xlValue) 
 If .HasMajorGridlines Then 
 ' Set the color to blue. 
 .MajorGridlines.Border.ColorIndex = 5 
 End If 
 End With 
 End If 
End With

LineStyle

Renvoie ou définit le style de ligne de la bordure.

Valeurs possibles sont xl3DBar - Groupe ou série de graphiques 3D en courbes, xl3DSurface - Groupe ou série de graphiques 3D en surface, xlAbove - Affichage de la ligne récapitulative au-dessus de la plage spécifiée, xlAutomatic - Word applique les paramètres automatiques, tels que la couleur ou le numéro de page, à l'objet spécifié, xlBar - Groupe ou série de graphiques 2D en barres, xlBelow - Affichage de la ligne récapitulative en dessous de la plage spécifiée, xlBoth - Affichage des barres d'erreurs, positives et négatives, dans le groupe ou la série de graphiques spécifié, xlBottom - Bas, xlCenter - Centrer, xlChecker - Modèle de vérificateur, xlCircle - Cercle, xlColumn - Groupe ou série de graphiques en colonnes, xlCombination - Combinaison, xlCorner - Angle, xlCrissCross - Motif entrecroisé, xlCross - Motif croisé, xlCustom - Word applique les paramètres personnalisés, tels qu'une couleur ou une marge d'erreur, à l'objet spécifié, xlDefaultAutoFormat - Word applique la mise en forme automatique ou par défaut, xlDiamond - Losange, xlDistributed - Distribué, xlFill - Remplir, xlFixedValue - Affichage des marges d'erreur sous forme d'une valeur fixe, xlGeneral - Général, xlGray16 - Gris 16 %, xlGray25 - Gris 25 %, xlGray50 - Gris 50 %, xlGray75 - Gris 75 %, xlGray8 - Gris 8 %, xlGrid - Grille, xlHigh - Haut, xlInside - Intérieur, xlJustify - Justifier, xlLeft - Gauche, xlLightDown - Motif de trait fin vers le bas, xlLightHorizontal - Motif de trait fin horizontal, xlLightUp - Motif de trait fin vers le haut, xlLightVertical - Motif de trait fin vertical, xlLow - Bas, xlMaximum - Maximum, xlMinimum - Minimum, xlMinusValues - Valeurs négatives, xlNextToAxis - En regard de l'axe, xlNone - Barres d'erreur non affichées dans le groupe ou la série de graphiques spécifié, xlOpaque - Remplissage opaque, xlOutside - Extérieur, xlPercent - Affichage des marges d'erreur sous forme d'un pourcentage, xlPlus - Affichage des barres d'erreurs positives dans le groupe ou la série de graphiques spécifié, xlPlusValues - Valeurs positives, xlRight - Droite, xlScale, xlSemiGray75 - Demi-gris 75 %, xlShowLabel - Affichage de l'intitulé, xlShowLabelAndPercent - Affichage de l'intitulé et du pourcentage, xlShowPercent - Affichage du pourcentage, xlShowValue - Affichage de la valeur, xlSingle - Ligne simple, xlSolid - Motif uni, xlSquare - Encadré, xlStar - Étoile, xlStError - Affichage des marges d'erreur sous forme d'erreur standard, xlTop - Haut, xlTransparent - Remplissage transparent, xlTriangle - Triangle.

Les constantes xlDouble et xlSlantDashDot de l’énumération XlLineStyle ne s’appliquent pas aux graphiques.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 With .Chart 
 .ChartArea.Border.LineStyle = xlDashDot 
 With .PlotArea.Border 
 .LineStyle = xlDashDotDot 
 .Weight = xlThick 
 End With 
 End With 
 End If 
End With 

Parent

Renvoie le parent de l'objet spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.Background.Chart.DataTable.Border.Parent

Weight

Cette propriété renvoie ou définit la largeur de la bordure.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.Axes(xlValue).Border.Weight = xlMedium 
 End If 
End With