Tracer un graphique avec Excel

Bonjour!

Je crée ce post à la suite de l'un de mes précédents où j'étais coincé car je souhaitais créer un graphique à partir de Matlab sur Excel.

J'ai enfin réussi à trouver quelque chose !
Du coup voici mon code et ce qu'il me donne (image en bas) :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

t=1:1:n; range7=sprintf('%c%d:%c%d','A'+7,5,'A'+7,4+n); range81=sprintf('%c%d:%c%d','A'+2,5,'A'+2,4+n); range82=sprintf('%c%d:%c%d','A'+3,5,'A'+3,4+n); Excel.Worksheets.Item(1).Range(range7).Value=t'; XRange=Excel.Worksheets.Item(1).Range(range7).Value;   Excel.ActiveWorkbook.Charts.Item(1).SeriesCollection.NewSeries; Excel.ActiveWorkbook.Charts.Item(1).ChartType='xlLineMarkers'; Excel.ActiveWorkbook.Charts.Item(1).HasTitle=1; Excel.ActiveWorkbook.Charts.Item(1).ChartTitle.Characters.Text='Effort d écartement - Raideur '; Y1Range=Excel.Worksheets.Item(1).Range(range82).Value; Excel.ActiveWorkbook.Charts.Item(1).SeriesCollection.NewSeries.XValues=XRange; Excel.ActiveWorkbook.Charts.Item(1).SeriesCollection.NewSeries.Values=Y1Range;

---

Le problème c'est que je ne comprend vraiment pas pourquoi est ce que j'ai 3 points de différentes couleurs alors que je ne prend qu'une seule colonne dans mon code !
Et mon second soucis, plus important cette fois ci, lorsque j'ai plus de 10 fichiers textes (environ) mon code est en erreur :

Code:

---

1 2 3 4 5 6 7 8

??? Invoke Error, Dispatch Exception: Source: Microsoft Office Excel Description: Impossible de définir la propriété Values de la classe Series. Help File: C:\Program Files\Microsoft Office\OFFICE11\1036\xlmain11.chm Help Context ID: 0   Error in ==> Programme_calculs_handtouch at 203 Excel.ActiveWorkbook.Charts.Item(1).SeriesCollection.NewSeries.Values=Y1Range;

---

Merci !

au risque de me planter c'est pas

Code:

---

1 2	Excel.ActiveWorkbook.Charts.Item(1).SeriesCollection.NewSeries.YValues=Y1Range;

---

Tu ne peux pas utiliser NewSeries à chaque fois.

Il faut faire simplement :

Code:

---

1 2 3

series = Excel.ActiveWorkbook.Charts.Item(1).SeriesCollection.NewSeries; series.XValues = XRange; series.Values = Y1Range;

---

Citation:

---

Envoyé par Dombrai

au risque de me planter c'est pas

Code:

---

1 2	Excel.ActiveWorkbook.Charts.Item(1).SeriesCollection.NewSeries.YValues=Y1Range;

---

---

Non il n'y a pas de Y :)

DUT:

Je me suis aperçu de ça ouais :)
J'ai remarqué qu'à chaque fois que j'utilisais un ".NewSeries" ça m'ajoutais une série en plus... D'où le fait que j'ai 3 séries dont une seule qui a les valeurs en Y avec la ligne 14.

Du coup mon code donne ceci maintenant :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

%Création des graph sur Charts range81=sprintf('%c%d:%c%d','A'+2,5,'A'+2,4+n); range82=sprintf('%c%d:%c%d','A'+3,5,'A'+3,4+n);   Excel.ActiveWorkbook.Charts.Item(1).SizeWithWindow=1; Excel.ActiveWorkbook.Charts.Item(1).SeriesCollection.NewSeries; Excel.ActiveWorkbook.Charts.Item(1).ChartType='xlLineMarkers'; Excel.ActiveWorkbook.Charts.Item(1).HasTitle=1; Excel.ActiveWorkbook.Charts.Item(1).ChartTitle.Characters.Text='Effort d écartement - Raideur '; Y1Range=Excel.Worksheets.Item(1).Range(range82).Value; Excel.ActiveWorkbook.Charts.Item(1).SeriesCollection('Série1').Values=Y1Range; Excel.ActiveWorkbook.Charts.Item(1).Axes(2).HasTitle=1; Excel.ActiveWorkbook.Charts.Item(1).Axes(2).AxisTitle.Characters.Text='Effort Max(N)'; Excel.ActiveWorkbook.Charts.Item(1).HasLegend=0;

---

J'ai cependant tjs le même soucis qui m'empêche d'avoir le graphique avec plus d'une dizaine de fichiers .txt ! Et c'est très embêtant !

J'ai essayé de chercher dans SeriesCollection sans aucun succès. Je n'arrive pas à comprendre ! :?

C'est normal, voici ce que dit la documentation d'Excel :

Citation:

---

Utilisez un graphique en courbes si les étiquettes des catégories comportent du texte et qu’elles représentent des valeurs régulièrement espacées, telles que les mois, les trimestres ou les années fiscales. Ce type de graphique doit surtout être utilisé dans le cas de plusieurs séries. Pour une seule série, il est préférable d’utiliser un graphique à nuages de points. Utilisez également un graphique en courbes s’il n’y a que quelques étiquettes numériques sur l’axe des catégories, surtout s’il s’agit d’années. Au-delà de dix étiquettes numériques, utilisez plutôt un graphique en nuages de points.

---

Il faut donc plutôt utiliser le type de graphique xlXYScatterLines ou xlXYScatterLinesNoMarkers.

Pourquoi si je le fais à la "main" ça me trace le graph dans ce cas ?

EDIT : J'ai essayé avec "xlXYScatterLines", j'ai bien eu le même problème :cry:
EDIT2: J'ai essayé aussi avec "xlXYScatterLinesNoMarkers", la même !

J'ai sans doute mal compris. Un fichier txt correspondrait à une série, c'est ça ?

Non pas du tout. Un fichier texte correspond à une case dans Excel. Pour chaque case j'ai un point sur le graph. Donc pour chaque fichier .txt j'ai un point sur le graph.

Je viens de voir qu'à précisément 16 fichiers il m'affiche le graph et qu'à partir de 17 il m'affiche l'erreur :

Code:

---

1 2 3 4 5 6 7 8

??? Invoke Error, Dispatch Exception: Source: Microsoft Office Excel Description: Impossible de définir la propriété Values de la classe Series. Help File: C:\Program Files\Microsoft Office\OFFICE11\1036\xlmain11.chm Help Context ID: 0   Error in ==> Programme_calculs_handtouch at 210 Excel.ActiveWorkbook.Charts.Item(2).SeriesCollection('Série1').Values=Y2Range;

---

Il y a sans doute un soucis avec les valeurs.

Contrôle les adresses des plages et les valeurs qui y sont copiées.

Mes range81 et 82 copient bien les bonnes valeurs et mon Y1Range et mon Y2Range m'affichent bien les bonnes aussi sur matlab. Tout coïncide bien.

Matlab bloque vraiment que sur :

Code:

---

Excel.ActiveWorkbook.Charts.Item(1).SeriesCollection('Série1').Values=Y1Range;

---

ou

Code:

---

Excel.ActiveWorkbook.Charts.Item(2).SeriesCollection('Série1').Values=Y2Range;

---

(c'est ma deuxième page graphique avec mon deuxième graph)

J'ai remarqué aussi que les 2 graph (sur ma 1ère et 2ème page) ne bug pas au même nombre de fichiers texte alors qu'ils font exactement la même chose, il y a juste une colonne de décalée... Je comprend vraiment pas !

Petit up. Je n'ai tjs pas trouvé d'où pouvait venir le problème :(

J'ai crée d'autres courbes sur le même graph avec d'autres styles et ça me renvoi le même message d'erreur. Cependant, comme je l'ai dit dans mon précédent post, il se met en erreur avec différent nombre de fichiers .txt, c'est franchement bizarre !

S'il vous manque des infos n'hésitez pas hein !