Excel, tracer une courbe de type XY
Bonjour,
J'essaie de tracer sur Excel, via vb.Net, une courbe de type XY.
J'ajoute correctement mes données X et Y dans une feuille, mais lorsqu'il s'agit d'afficher, je ne trouve pas l'option pour indique que les valeurs de X sont dans comprises dans la plage "A2","Ax" de ma feuille...
En gros si, pour les abscisses, à chaque point, j'ai un incrément de 1.
Voici mon code :
Try
'nouvelle feuille pour y mettre les données
Classeur.Sheets.Add(, Classeur.Sheets.Item(Classeur.Sheets.Count))
feuille = Classeur.ActiveSheet
'renommer la feuille
feuille.Name = "Données" & NumeroCycle
'écriture des en têtes
feuille.Range("A1", "A1").Value = "Valeur de X"
feuille.Range("B1", "B1").Value = "Valeur de Y"
'écriture des données X et Y sur la feuille
feuille.Range("A2", "B" & (tabXY.Length / 2) + 1).Value = tabXY
feuille.Columns.AutoFit()
'------------------------------------------------
'nouveau graphique pour y afficher la courbe XY
Classeur.Charts.Add(, Classeur.Sheets.Item(Classeur.Sheets.Count))
Graph = Classeur.ActiveChart
'renommer le graphique
Graph.Name = "graph" & NumeroCycle
'type de courbe (nuage de points)
Graph.ChartType = Excel.XlChartType.xlXYScatterSmoothNoMarkers
'affectation des données pour les ordonnées (valeur de Y)
Graph.SetSourceData(feuille.Range("B2", "B" & (tabXY.Length / 2) + 1), Excel.XlRowCol.xlColumns)
'courbe.SeriesCollection(1).Name = "tsointsoin"
Catch ex As Exception
End Try
Cordialement,
J
