Discussion :

[olivierabristol]

Bonjour, j'utilise un chartspace pour afficher un profil d'aile . Les données d'entrée sont 2 tableaux: 1 pour les X: testX(17, un pour les y: testY(17).

mon code est le suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
    Dim testX(17) As Variant, testY(17) As Variant
 
    Dim oChart As ChChart
    ChartSpace1.Clear
    ChartSpace1.Refresh
    Set oChart = ChartSpace1.Charts.Add
 
 
    Dim oSeries
    Set oSeries = oChart.SeriesCollection.Add
    With oSeries
         .SetData chDimCategories, chDataLiteral, testX()
        .SetData chDimValues, chDataLiteral, testY()
        .Type = chChartTypeLine
    End With

Mon problème est que cette méthode créé une courbe avec les bonne ordonnée mais pas en abscisse. Chaque valeur de mon tableau d'abscisse est affichée dans la colonne des axes et régulierement espacée, sans respect de sa valeur numérique. Au final, la courbe n'a pas la bonne forme...

en image, ça donne cela:

ce que je veux:



ce que j'ai:



j'espère que vous comprendrez le truc, c'est pas facile a expliquer.

merci d'avance