VBA, Graphique : Toujours à propos des ranges discontinus ..

Version imprimable

27/09/2005, 17h00
CCHEVALIER

VBA, Graphique : Toujours à propos des ranges discontinus ..

Bonjour,

Je bute sur certains miracles d'Excel ... J'ai une série de donnée qui pointe sur un range discontinu. Je sais de quel range il s'agit.

J'ai une string "formule" qui vaut :

=SERIES("BONDS ASW",('[MonClasseur.xls]Mafeuille'!$I$23,'[MonClasseur.xls]Mafeuille'!$I$25:$I$27),('[MonClasseur.xls]Mafeuille'!$M$23,'[MonClasseur.xls]Mafeuille'!$M$25:$M$27),1)

lorsque j'affecte cette string comme formule à ma série, ca marche impecable. L'instruction est :
MonGraph.chart.seriescollection(maserie).formula=formule

Maintenant, lorsque je prend une formule un peu plus longue :
=SERIES("BONDS ASW",('[MonClasseur.xls]Mafeuille'!$I$23,'[MonClasseur.xls]Mafeuille'!$I$25:$I$27,'[MonClasseur.xls]Mafeuille'!$I$30),('[MonClasseur.xls]Mafeuille'!$M$23,'[MonClasseur.xls]Mafeuille'!$M$25:$M$27,'[MonClasseur.xls]Mafeuille'!$M$30),1)

ca ne marche plus ! (error : couldnt set the formula property ...).
Pourtant la formule est presque la meme ! J'ai juste rajouté un point ! (I30,M30) !!!!

Mieux: quand on fait cette modif directement sur la feuille Excel, à la main, la ca marche ...

Si quelqu'un a une idée, merci !
27/09/2005, 17h19
CCHEVALIER

Non je vois pas :?
Je separe mes ranges par des virgules, et j'ai entre 2 parenthèse l'ensemble des ranges pour l'axe des abscice puis entre 2 autres parenthèses l'ensemble des ranges pour l'axe des ordonnées.

Dans le premier cas j'ai 2 ranges pour les abscice, 2 pour les ordonnées.
Dans le second cas j'ai 3 ranges pour les abscice, 3 pour les ordonnées.
27/09/2005, 17h31
CCHEVALIER

Merci et désolé parce que c'est vrai que ca fait mal aux yeux.

Je vois 3 parenthèses ouvrantes :
- Une après SERIES
- Une après BONDS ASW",
- Une après Mafeuille'!$I$30),

et 3 fermantes
- une à la fin
- une juste avant la fin
- une après Mafeuille'!$I$30

Soit j'ai bon soit je suis vraiment fatigué :cry:
Faut dire que je me prend la tete depuis ce matin avec ces histoires :) j'ai pas mal avancé et je suis pas loin du but

il faudrai que tu nous montre un peu + de ton code ... création de la chaîne.... etc..etc ...

car chez moi cela marche avec ta chaîne :

Code:

1
2
3
4
5
6
7
8
Sub Macro1()
'
' 
'
     ActiveChart.SeriesCollection(1).Formula = "=SERIES(""BONDS ASW"",('[MonClasseur.xls]Mafeuille'!$I$23,'[MonClasseur.xls]Mafeuille'!$I$25:$I$27,'[MonClasseur.xls]Mafeuille'!$I$30),('[MonClasseur.xls]Mafeuille'!$M$23,'[MonClasseur.xls]Mafeuille'!$M$25:$M$27,'[MonClasseur.xls]Mafeuille'!$M$30),1)"
 
 
End Sub

:wink:

27/09/2005, 18h35
CCHEVALIER

Merci d'avoir testé chez toi.
je te donne ma ligne exacte :

snapGraph.Chart.SeriesCollection(SeriesName).Formula = "=SERIES(""BONDS ASW"",('[RVTSnapshotView.xls]Iboxx Snapshot View'!$I$23,'[RVTSnapshotView.xls]Iboxx Snapshot View'!$I$25:$I$27,'[RVTSnapshotView.xls]Iboxx Snapshot View'!$I$30),('[RVTSnapshotView.xls]Iboxx Snapshot View'!$M$23,'[RVTSnapshotView.xls]Iboxx Snapshot View'!$M$25:$M$27,'[RVTSnapshotView.xls]Iboxx Snapshot View'!$M$30),1)"

Celle ci ne marche pas. (J'avais auparavant changé les noms pour vous simplifier la tache).

Par contre cette ligne ci marche tres bien:

snapGraph.Chart.SeriesCollection(SeriesName).Formula = "=SERIES(""BONDS ASW"",('[RVTSnapshotView.xls]Iboxx Snapshot View'!$I$23,'[RVTSnapshotView.xls]Iboxx Snapshot View'!$I$25:$I$27),('[RVTSnapshotView.xls]Iboxx Snapshot View'!$M$23,'[RVTSnapshotView.xls]Iboxx Snapshot View'!$M$25:$M$27),1)"

C'est pile poil la meme, sauf que j'ai enlevé les derniers ranges.

Pour info, Snapgrah est un chartobject public, c'est le graphique de ma feuille Iboxx Snapshot View
SeriesName est une string qui vaut "Bonds ASW", c'est le label de mes series ...

C'est fou que la meme ligne marche chez toi et pas chez moi (j'ai fait copier coller de ta ligne pour etre sur ...)
27/09/2005, 18h42
SilkyRoad

bonsoir

il me semble que pour les formules graphique "=SERIES ..." , le nombre de carateres dans la barre de formules est limité à 255

j'ai compté 335 caracteres dans ta formule

=SERIES(""BONDS ASW"",('[RVTSnapshotView.xls]Iboxx Snapshot View'!$I$23,'[RVTSnapshotView.xls]Iboxx Snapshot View'!$I$25:$I$27,'[RVTSnapshotView.xls]Iboxx Snapshot View'!$I$30),('[RVTSnapshotView.xls]Iboxx Snapshot View'!$M$23,'[RVTSnapshotView.xls]Iboxx Snapshot View'!$M$25:$M$27,'[RVTSnapshotView.xls]Iboxx Snapshot View'!$M$30),1)

bonne soiree
michel
27/09/2005, 18h42
CCHEVALIER

J'ai cru un moment que c'etait ma string Formule qui était trop grande, mais ca semble pas etre ca.
Merci encore à tous les 2 et si vous avez la moindre idée, n'hésitez pas
27/09/2005, 18h48
CCHEVALIER

Tiens c'est marrant on a posté en meme temps sur la meme idée :)
Je vais compter mes caracteres !
Merci pour ta suggestion !
27/09/2005, 20h27
SfJ5Rpw8

si tu compte ... tu devrais arriver à 336 (avec tous les ") ... d'ou > 255... :cry:
28/09/2005, 09h15
CCHEVALIER

En effet. C'est donc ce cher Excel qui m'a pourrit toute la journée de travail d'hier :lol:
Merci à tous pour votre aide, c'est super sympa !

A+