Automatisation courbe de tendance Excel

Fermé
seblg29 - 27 déc. 2017 à 11:05
Frenchie83 Messages postés 2240 Date d'inscription lundi 6 mai 2013 Statut Membre Dernière intervention 11 août 2023 - 31 déc. 2017 à 07:44
Bonjour,

Je souhaiterais automatiser l'ajout d'une courbe de tendance sous Excel.
Cependant, je souhaiterais que la courbe de tendance s'ajuste de façon linéaire ou polynomial d'ordre 2 en fonction de mes données.
Auriez vous une idée pour développer cela sous Excel ou vba ?

D'avance merci pour vos idées.

Sebastien
A voir également:

1 réponse

Frenchie83 Messages postés 2240 Date d'inscription lundi 6 mai 2013 Statut Membre Dernière intervention 11 août 2023 338
31 déc. 2017 à 07:44
Bonjour,
Auriez vous une idée pour développer cela sous Excel ou vba ? oui
Utilisez l'enregistreur de macro pour créer une courbe de tendance, sélectionnez tour à tour "Polynomiale d'ordre 2" puis "Linéaire" . Regarder le code obtenu, modifiez le pour l'adapter à vos besoins et qu'il réagisse en fonction de vos données. Ce qui donne quelque chose comme ceci:
Sub CourbeDeTendance()
    Application.ScreenUpdating = False
    ActiveSheet.ChartObjects("Graphique 1").Activate
    ActiveChart.SeriesCollection(2).Trendlines(2).Select
    
    'Suivant le type de données, on choisit
    If MesDonnees = "Choix 1" Then
        'courbe de tendance polynomiale d'ordre 2
        With Selection
            .Type = xlPolynomial
            .Order = 2
        End With
    
    ElseIf MesDonnees = "Choix 2" Then
        'Courbe de tendance linéaire
        Selection.Type = xlLinear
    End If
End Sub

A vous de jouer
Cdlt
0