Discussion :

[Sylvain11]

Salut,
je tente t'écrire un code qui me permettrait de récupérer sous excel deux arrays sous forme d'un graph xy.
J'arrive à importer sous Excel mes données par le biais d'un :
Excel := CreateOleObject('Excel.Application');
et une boucle for sur mon array par
Excel.Cells[i,1].Formula := tableau[i].
Mais comment convertir ensuite mes deux colonnes en un graph? (comment créer un graph & le remplir?) J'arrive à inclure un graph par
Excel.Charts.add;
Mais impossible de changer le type !

Je precise que j'utilise Delphi 2005

Toute aide est la bienvenue, merci d'avance!

[plante20100]

Le plus simple je pense c'est de créer un modèle Excel. Dans ce modèle tu crée un graph et tu lui indique comme source les deux colonnes que tu vas remplir depuis Delphi.

Après depuis Delphi tu ouvres ton modèle, tu remplies tes colonnes et tu enregistres sous un autre nom...

Bien sur c'est pas aussi jolie que de créer directement un graphe depuis delphi mais c'est mieux que rien.

++

Vince

[Sylvain11]

Effectivement, c'est la solution que j'applique en ce moment, mais c'est pas l'idéal, étant donné que c'est un prog à diffusion un peu large, et que la moitié des gens à qui je l'envoie oublient de mettre le template quand ils le renvoient à d'autres...
Mais je te remercie de ton aide, et d'avoir pris le temps de me repondre!

[plante20100]

Je viens de me souvenir d'un truc, c'est quand tu veux ajouter une feuille à un classeur tu spécifies le type de feuille à ajouter. et là tu peux choisir de rajouter une feuille graph:

Code :

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

Monclasseur.Sheets.Add(EmptyParam,EmptyParam,1,xlWBATChart,0);

J'ai trouvé ca dans la FAQ: http://delphi.developpez.com/faq/?pa...laajoutfeuille

Voila j'espère que ca va t'aider

Tiens nous au courant

Vince

[Sylvain11]

Effectivement, c'est une bonne solution!
J'ai également trouvé il y a au moins 5 minutes qu'apres avoir créé le graph par
x := Excel.Charts.add;
On peut faire, par exemple, un graph xy par :
x.ChartType := 74 ; (table des correspondances nombre -- type sur le site de MS)
Cette méthode permet de ne pas avoir à inclure ExcelXP (ou Excel 2000, ou...) dans les uses!
Par contre, du coup, je cherche à changer la taille des fontes des axes, et à désactiver la légende, sans avoir à utiliser le uses Excel. Si tu as une idée?

En tous cas, merci de ton aide, je pourrai toujours passer par là si je n'y arrive pas sans le use Excel! Merci bien!

[plante20100]

regarde ici:
http://www.phidels.com/php/index.php...r%20OLE&id=111

Il n'y a pas exactement ce que tu cherches mais ca peut te donner une idée de la syntaxe.

++
vince

PS: Je crois que je vais faire migrer mon code pour éviter de mettre Excel97 dans les uses et après etre embeté quand j'exécute l'appli sur un poste ou il y a office2000 par ex.

Est ce que tu sais selectionner une colonne entière?
merci

[Sylvain11]

Merci, ca aide pas mal, effectivement, y a ce qu'il me fallait!
Et comme ca, je suis indépendant des versions d'XL!
Pour selectionner une colonne entière, fais :
Excel.range['C:C'].select;
Voila! Encore merci et a+

[plante20100]

Merci pour l'indication.

Si tu as trouvé ton bonheur n'oublie de mettre le tag

Résolu

++

Vince