Classe Chart (Word VBA)

La classe Chart représente un graphique dans un document.

Les procédures principales de la classe Chart sont Copy, Delete et Select

Set

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

Dim chr as Chart
Set chr = ActiveDocument.Background.Chart

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe Chart : InlineShape.Chart et Shape.Chart

Thèmes

Certaines procédures de cette classe ont été regroupées en thèmes et sont décrites sur des pages thématiques séparées

Name with its procedures ChartTitle, HasTitle et SeriesNameLevel
Display/Show with its procedures DisplayBlanksAs, ShowAllFieldButtons, ShowLegendFieldButtons et ShowValueFieldButtons

Méthodes

Les méthodes principales de la classe Chart sont

Copy - Non prise en charge pour cet objet.

ActiveDocument.Background.Chart.Copy

Delete - Cette méthode supprime l'objet.

ActiveDocument.Background.Chart.Delete

Select - Cette méthode sélectionne l'objet.

ActiveDocument.Background.Chart.Select

Autre Méthodes

ApplyDataLabels - Cette méthode applique des étiquettes de données à toutes les séries d'un graphique.

ActiveDocument.Background.Chart.ApplyDataLabels

ApplyLayout - Cette méthode applique les mises en page proposées dans le Ruban.

Dim lngLayout As Long: lngLayout =  
ActiveDocument.Background.Chart.ApplyLayout Layout:=lngLayout

Axes - Renvoie la collection des axes du graphique.

Dim axs As Axes
Set axs = ActiveDocument.Background.Chart.Axes()

ChartWizard - Cette méthode modifie les propriétés d'un graphique déterminé.

ActiveDocument.Background.Chart.ChartWizard

Export - Cette méthode exporte le graphique dans un format graphique.

Dim strFileName As String: strFileName =  
Dim booExport As Boolean
booExport = ActiveDocument.Background.Chart.Export(FileName:=strFileName)

GetChartElement - Renvoie des informations sur l’élément du graphique spécifié aux coordonnées X et Y.

Dim lngx As Long: lngx = 
Dim lngy As Long: lngy = 
Dim lngElementID As Long: lngElementID = 
Dim lngArg1 As Long: lngArg1 = 
Dim lngArg2 As Long: lngArg2 =  
ActiveDocument.Background.Chart.GetChartElement x:=lngx, y:=lngy, ElementID:=lngElementID, Arg1:=lngArg1, Arg2:=lngArg2

SetSourceData - Définit la plage de données sources du graphique.

Dim strSource As String: strSource =  
ActiveDocument.Background.Chart.SetSourceData Source:=strSource

Propriétés

AutoScaling La valeur true si Microsoft Word met à l'échelle un graphique en 3D de sorte qu'il soit plus proche en taille du graphique 2D équivalent.

ActiveDocument.Background.Chart.AutoScaling = True

BackWall Renvoie un objet qui permet à l'utilisateur de mettre en forme individuellement le mur arrière d'un graphique en 3D.

Dim wllsBackWall As Walls
Set wllsBackWall = ActiveDocument.Background.Chart.BackWall

BarShape Cette propriété renvoie ou définit la forme utilisée pour toutes les séries d’un graphique en histogrammes ou en barres 3D.

ActiveDocument.Background.Chart.BarShape = xlBox

CategoryLabelLevel Cette propriété renvoie ou définit une constante XlCategoryLabel qui spécifie le niveau de source des étiquettes de catégorie de graphique.

ActiveDocument.Background.Chart.CategoryLabelLevel = xlCategoryLabelLevelAll

ChartArea Renvoie la zone de graphique complète du graphique.

Dim caaChartArea As ChartArea
Set caaChartArea = ActiveDocument.Background.Chart.ChartArea

ChartColor Renvoie ou définit un entier qui représente le jeu de couleurs pour le graphique.

ActiveDocument.Background.Chart.ChartColor =

ChartData Cette propriété renvoie des informations sur les données liées ou incorporées associées à un graphique.

Dim cdaChartData As ChartData
Set cdaChartData = ActiveDocument.Background.Chart.ChartData

ChartGroups Renvoie un objet qui représente soit un seul groupe de graphiques, soit une collection de tous les groupes de graphiques dans le graphique.

Dim cgsChartGroups As ChartGroups
Set cgsChartGroups = ActiveDocument.Background.Chart.ChartGroups

ChartStyle Cette propriété renvoie ou définit le style de graphique pour le graphique.

ActiveDocument.Background.Chart.ChartStyle =

ChartType Cette propriété renvoie ou définit le type de graphique.

ActiveDocument.Background.Chart.ChartType =

DataTable Renvoie le tableau de données graphiques.

Dim dteDataTable As DataTable
Set dteDataTable = ActiveDocument.Background.Chart.DataTable

DepthPercent Cette propriété renvoie ou définit la profondeur d’un graphique en 3D sous la forme d’un pourcentage de la largeur du graphique (entre 20 et 2000 pour cent).

ActiveDocument.Background.Chart.DepthPercent =

Elevation Cette propriété renvoie ou définit l’altitude, en degrés, de l’affichage de graphique 3D.

ActiveDocument.Background.Chart.Elevation =

Floor Renvoie le plancher du graphique 3D.

Dim flrFloor As Floor
Set flrFloor = ActiveDocument.Background.Chart.Floor

GapDepth Cette propriété renvoie ou définit la distance, sous la forme d’un pourcentage de la largeur de la marque, entre les séries de données d’un graphique en 3D.

ActiveDocument.Background.Chart.GapDepth =

HasAxis Cette propriété renvoie ou définit quels sont les axes existants du graphique.

ActiveDocument.Background.Chart.HasAxis = True

HasDataTable Cette propriété a la valeur True si le graphique possède une table de données.

ActiveDocument.Background.Chart.HasDataTable = True

HasLegend Cette propriété a la valeur True si le graphique possède une légende.

ActiveDocument.Background.Chart.HasLegend = True

HeightPercent Cette propriété renvoie ou définit la hauteur d'un graphique en 3D sous la forme d'un pourcentage de la largeur du graphique (de 5 à 500 pour cent).

ActiveDocument.Background.Chart.HeightPercent =

Legend Renvoie la légende du graphique.

Dim lgnLegend As Legend
Set lgnLegend = ActiveDocument.Background.Chart.Legend

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

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

Perspective Cette propriété renvoie ou définit la perspective de l’affichage de graphique 3D.

ActiveDocument.Background.Chart.Perspective =

PivotLayout Non prise en charge pour cet objet.

Dim objPivotLayout As Object
Set objPivotLayout = ActiveDocument.Background.Chart.PivotLayout

PlotArea Renvoie la zone de traçage d'un graphique.

Dim paaPlotArea As PlotArea
Set paaPlotArea = ActiveDocument.Background.Chart.PlotArea

PlotBy Renvoie ou spécifie la façon dont les colonnes ou les lignes sont utilisées comme séries de données sur le graphique.

ActiveDocument.Background.Chart.PlotBy = xlColumns

PlotVisibleOnly True si seules les cellules visibles sont tracées.

ActiveDocument.Background.Chart.PlotVisibleOnly = True

RightAngleAxes Cette propriété a la valeur True si les axes du graphique se coupent à angle droit, quelle que soit la rotation ou l’élévation du graphique.

ActiveDocument.Background.Chart.RightAngleAxes = True

Rotation Cette propriété renvoie ou définit la rotation, en degrés, de l’affichage graphique 3D (la rotation de la zone de traçage autour de l’axe z).

ActiveDocument.Background.Chart.Rotation =

Shapes Renvoie une collection qui représente toutes les formes de la feuille de graphique.

Dim shpsShapes As Shapes
Set shpsShapes = ActiveDocument.Background.Chart.Shapes

ShowAxisFieldButtons Renvoie ou définit si tous les boutons de champ d'axe d'un graphique croisé dynamique doivent être affichés.

ActiveDocument.Background.Chart.ShowAxisFieldButtons = True

ShowDataLabelsOverMaximum Cette propriété renvoie ou définit une valeur qui indique s'il faut afficher les étiquettes de données lorsque la valeur est supérieure à la valeur maximale sur l'axe des ordonnées.

ActiveDocument.Background.Chart.ShowDataLabelsOverMaximum = True

ShowReportFilterFieldButtons Renvoie ou définit si tous les boutons de champ de filtre de rapport d'un graphique croisé dynamique doivent être affichés.

ActiveDocument.Background.Chart.ShowReportFilterFieldButtons = True

SideWall Renvoie un objet Walls qui permet à l'utilisateur de mettre en forme individuellement le mur latéral d'un graphique en 3D.

Dim wllsSideWall As Walls
Set wllsSideWall = ActiveDocument.Background.Chart.SideWall

Walls Renvoie les murs du graphique en 3D.

Dim wllsWalls As Walls
Set wllsWalls = ActiveDocument.Background.Chart.Walls