Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
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 | 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
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.