Objet Trendlines (PowerPoint)

Représente une collection de tous les objets Trendline de la série spécifiée.

Remarques

Chaque objet Trendline représente une courbe de tendance dans un graphique. Une courbe de tendance indique la tendance, ou sens, des données d'une série.

Exemple

Remarque

Bien que le code suivant s’applique à Microsoft Word, vous pouvez le modifier dès à présent pour l’appliquer à PowerPoint.

Utilisez la méthode Trendlines pour renvoyer la collection Trendlines. L'exemple suivant affiche le nombre de courbes de tendance de la première série du premier graphique du document actif.

With ActiveDocument.InlineShapes(1)

    If .HasChart Then

        MsgBox .Chart.SeriesCollection(1).Trendlines.Count

    End If

End With

Remarque

Bien que le code suivant s’applique à Microsoft Word, vous pouvez le modifier dès à présent pour l’appliquer à PowerPoint.

Utilisez la méthode Add pour créer une courbe de tendance et l'ajouter à la série. L'exemple suivant ajoute une courbe de tendance linéaire à la première série du premier graphique dans le document actif.

With ActiveDocument.InlineShapes(1)
    If .HasChart Then
        .Chart.SeriesCollection(1) _
            .Trendlines.Add Type:=xlLinear, Name:="Linear Trend"
    End If
End With

Remarque

Bien que le code suivant s’applique à Microsoft Word, vous pouvez le modifier dès à présent pour l’appliquer à PowerPoint.

Utilisez Trendlines (Index), où Index est le numéro d'index de courbe de tendance, pour renvoyer un seul objet TrendLine. L'exemple suivant modifie le type de courbe de tendance pour la première série du premier graphique du document actif. Si la série ne possède aucune courbe de tendance, cet exemple échoue.

Le numéro d'index indique l'ordre dans lequel les courbes de tendance ont été ajoutées à la série. Trendlines(1) est la première courbe de tendance ajoutée à la série et Trendlines(Trendlines.Count), la dernière.

With ActiveDocument.InlineShapes(1)

    If .HasChart Then

        .Chart.SeriesCollection(1).Trendlines(1).Type = xlMovingAvg

    End If

End With

Voir aussi

Référence du modèle objet PowerPoint

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.