[VBA-EXCEL] Graphique à partir de Tableau

Salut,
J'ai un souci, je ne vois pas comment je pourrais tracer un graphique à partir d'un tableau déclaré dans une macro ...

Code:

---

Public MyArray(300,5) As Integer

---

Ce tableau est mis à jour dans diverses fonctions et j'aimerais pouvoir en créer un graphique (sans afficher les diverses valeurs dans une feuille de calcul)
Merci,

C'est impossible de définir un tableau en variable public :)

Citation:

---

Envoyé par illight

C'est impossible de définir un tableau en variable public :)

---

:koi: pourquoi .?

Bah après peut etre que je me trompe, mais J'ai jamais réussi a déclarer une variable tableau en public :) mais je crois que j'avais trouvé une parade a cette impossibilité, faut que je retrouve un de mes fichiers :mrgreen:

J'ai retrouvé :

Va voir ces 2 posts :

http://www.developpez.net/forums/sho...tableau+public

http://www.developpez.net/forums/sho...tableau+public


Le deuxième est un message de Sylkyroad, en fait qui dit qu'une vriable tableau ne peut etre déclarée en public si on lui donne des bornes dès le départ. On est obligé de faire un Redim pour pouvoir le fixer :)

Je n'ai aucun problème avec mon tableau déclaré en public dans un modue !
Il fonctionne parfaitement comme je le souhaite !

Ah 8O bizarre chez moi ça marche pas quand j'écris ça :mrgreen:



Pour ta question alors, il faudrait que tu nous précise ce que tu veux comme graphique :mrgreen:

Code:

---

Public MyArray(300,5) As Integer

---

Mon tableau contient 5 courbes de 300 valeurs que je souhaite afficher sur un graphique sans réaffecter chacune des valeurs dans des cellules d'une feuille de calcul ... (si possible bien sur)

bonsoir

tu peux tester cet exemple simple:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

Option Explicit Option Base 1   Sub creationGraphiqueParTableau() Dim i As Integer Dim Tableau(50) As Integer   For i = 1 To 50 Tableau(i) = Int((9 * Rnd) + 1) Next i   Charts.Add ActiveChart.Location _ Where:=xlLocationAsObject, Name:="Feuil1"   With ActiveChart .SeriesCollection.NewSeries .SeriesCollection(1).Values = Tableau() .ChartType = xlLine End With End Sub

---

Je ne sais pas s'il est possible de gérer directement des tableaux multicolonnes.
Par contre cela risque de ne pas marcher pour un tableau de 300 données. Il me semble que tu seras limité par le nombre de caractères (450?) dans la barre de formule de chaque série, car les valeurs seront affichées sous cette forme:

Code:

---

=SERIE(;;{5.7.1.6.5.3.6.6.3.3.8.8.6.9.9 ...

---

bonne soirée
michel

rebonsoir

OOuuppss... je viens de me souvenir de la FAQ ... ;o)

http://vb.developpez.com/faqvba/?pag...creategraphdyn


michel