Classe DataTable - tableau de données (Word VBA)

Cet objet représente un tableau de données graphiques. Pour utiliser une variable de classe DataTable, elle doit d'abord être instanciée, par exemple

Dim dte as DataTable
Set dte = ActiveDocument.Background.Chart.DataTable

Border

Renvoie la bordure de l'objet.

Dim cbrBorder As ChartBorder
Set cbrBorder = ActiveDocument.Background.Chart.DataTable.Border

Delete

Cette méthode supprime l'objet.

ActiveDocument.Background.Chart.DataTable.Delete

Font

Renvoie la police de l'objet spécifié.

Dim cftFont As ChartFont
Set cftFont = ActiveDocument.Background.Chart.DataTable.Font

Format

Renvoie la ligne, le remplissage et l'effet de la mise en forme pour l'objet.

Dim cftFormatted As ChartFormat
Set cftFormatted = ActiveDocument.Background.Chart.DataTable.Format

HasBorderHorizontal

Cette propriété a la valeur True si la table de données du graphique possède des bordures de cellules horizontales.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 With .Chart 
 .HasDataTable = True 
 With .DataTable 
 .HasBorderHorizontal = False 
 .HasBorderVertical = False 
 .HasBorderOutline = True 
 End With 
 End With 
 End If 
End With

HasBorderOutline

Cette propriété a la valeur True si la table de données du graphique possède un contour.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 With .Chart 
 .HasDataTable = True 
 With .DataTable 
 .HasBorderHorizontal = False 
 .HasBorderVertical = False 
 .HasBorderOutline = True 
 End With 
 End With 
 End If 
End With

HasBorderVertical

Cette propriété a la valeur True si la table de données du graphique possède des bordures de cellules verticales.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 With .Chart 
 .HasDataTable = True 
 With .DataTable 
 .HasBorderHorizontal = False 
 .HasBorderVertical = False 
 .HasBorderOutline = True 
 End With 
 End With 
 End If 
End With

Select

Cette méthode sélectionne l'objet.

ActiveDocument.Background.Chart.DataTable.Select

ShowLegendKey

Cette propriété a la valeur True si le symbole de légende d'étiquette de données est visible.

ActiveDocument.Background.Chart.DataTable.ShowLegendKey = True