Chart.ApplyCustomType, méthode (Project)

Article
10/25/2024

Applique un type de graphique personnalisé à un graphique.

Syntaxe

expression. ApplyCustomType (ChartType,TypeName)

expression Variable qui représente un objet Chart.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
ChartType	Obligatoire	Office.XlChartType	Type du graphique
TypeName	Facultatif	Variant	Nom du type de graphique.
ChartType	Obligatoire	XLCHARTTYPE
TypeName	Facultatif	Variant

Valeur renvoyée

Nothing

Exemple

L’exemple suivant remplace le type de graphique par un graphique à barres 3D en cluster.

Sub SetChartType()
    Dim chartShape As Shape
    Dim reportName As String
    
    reportName = "Simple scalar chart"
    Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
    
    Debug.Print "Chart type before: " & chartShape.Chart.ChartType
    chartShape.Chart.ApplyCustomType (xl3DBarClustered)
    Debug.Print "Chart type after: " & chartShape.Chart.ChartType
End Sub

Voir aussi

Objet Chart

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.

Partager via