Méthode Chart.SetElement (Project)

Ajoute l’élément spécifié à un graphique ou à un objet sélectionné dans un graphique.

Syntaxe

expression. SetElement (RHS)

expression Variable qui représente un objet Chart.

Paramètres

Valeur renvoyée

Nothing

Remarques

La valeur RHS pour la méthode SetElement correspond aux éléments des sous-menus Ajouter un élément de graphique . Différents éléments sont activés, selon le type de graphique. Si vous essayez d’ajouter un élément qui n’existe pas pour un graphique particulier, vous obtenez une erreur non spécifiée. Par exemple, sur un graphique 3D, l’élément Barres d’erreur de la liste déroulante Ajouter un élément de graphique n’est pas disponible. Un appel à Chart.SetElement msoElementErrorBarStandardDeviation entraîne une erreur.

Exemple

L’exemple suivant ajoute un quadrillage secondaire à l’axe des ordonnées, et ajoute des légendes d’étiquette de données à la seconde série de données.

Sub TestSetElements()
    Dim chartShape As Shape
    Dim reportName As String
    
    reportName = "Simple 3D chart"
    Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
    
    With chartShape.Chart
        .SetElement msoElementChartTitleAboveChart
        
        ' Select the major gridlines on the value axis, and then add minor gridlines.
        .axes(Office.xlValue).MajorGridlines.Select
        .SetElement msoElementPrimaryCategoryGridLinesMinor
        
        ' Select the second data series and add data label callouts.
        If .SeriesCollection.Count > 1 Then
            .SeriesCollection(2).Select
            .SetElement msoElementDataLabelCallout
        End If
    End With
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.