Chart.ApplyCustomType, méthode (Project)

  • Article

Applique un type de graphique personnalisé à un graphique.

Syntaxe

expression. ApplyCustomType(ChartType,TypeName)

expression Variable qui représente un objet Chart.

Parameters

Nom Requis/Facultatif Type de données Description
ChartType Requis Office.XlChartType Type du graphique
TypeName Facultatif Variant Nom du type de graphique.
ChartType Requis 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.