serie graphique

[francky]

Bonjour,

J essaie de configurer mon graphique depuis une semaine et je n y arrive comme je le veux, pourtant ca m a lair faisable mais je n y arrive pas!

Je vous explique, en fait je saise chaque jour dans un tableau des taux, et j ai besoin de réaliser un tableau qui ne m afficherai la courbe de ces taux que pour une periode de 1 mois.

J ai vraiment tout essayer je vais devenir fou!!!

Je suis preneur si vou pouvez me filer un coup de main!

 

[sylv900]

peut tu donner un extrait de ton code ou de ta feulle excel à traiter stp, c'est trop flou... voici quand même un extrait d'un de mes code pour faire un graphique par série :

'mise en forme du tableau(moi j'ai besoin de modifier la forme du tableau avant de traiter la feuille Export)
m = n = o = 0
For i = 1 To nbligne
m = 4 * i - 2
ActiveSheet.Range('A' & m & ':C' & m).Select
Selection.Cut Destination:=ActiveSheet.Range('D' & i & ': F' & i)
n = 4 * i - 1
ActiveSheet.Range('A' & n & ':C' & n).Select
Selection.Cut Destination:=ActiveSheet.Range('G' & i & ': I' & i)
o = 4 * i
ActiveSheet.Range('A' & o & ':C' & o).Select
Selection.Cut Destination:=ActiveSheet.Range('J' & i & ': L' & i)
Next

ActiveSheet.Columns('A:C').Delete
ActiveSheet.Columns('A:I').EntireColumn.AutoFit
ActiveSheet.Columns('A:A').Select
Selection.NumberFormat = 'd/m/yy h:mm'
ActiveSheet.Columns('D😀').Select
Selection.NumberFormat = 'd/m/yy h:mm'
ActiveSheet.Columns('G:G').Select
Selection.NumberFormat = 'd/m/yy h:mm'
ActiveSheet.Range('A1').Select

'création d 'un graphique lui même

Charts.Add
ActiveChart.ChartType = xlXYScatterLines
ActiveChart.SeriesCollection(1).Delete
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection.NewSeries

ActiveChart.SeriesCollection(1).XValues = '=Export!C1'
ActiveChart.SeriesCollection(1).Values = '=Export!C3'
ActiveChart.SeriesCollection(1).Name = '=Export!R1C2'
ActiveChart.SeriesCollection(2).XValues = '=Export!C4'
ActiveChart.SeriesCollection(2).Values = '=Export!C6'
ActiveChart.SeriesCollection(2).Name = '=Export!R1C5'
ActiveChart.SeriesCollection(3).XValues = '=Export!C7'
ActiveChart.SeriesCollection(3).Values = '=Export!C9'
ActiveChart.SeriesCollection(3).Name = '=Export!R1C8'

ActiveChart.Location Where:=xlLocationAsNewSheet, Name:='%acquis_graph'
With ActiveChart
.HasTitle = True
.ChartTitle.Characters.Text = 'Evolution de l'acquisition en fonction du temps'
.Axes(xlCategory, xlPrimary).HasTitle = True
.Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = 'Dates'
.Axes(xlValue, xlPrimary).HasTitle = True
.Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = 'Pourcentages'

 

[JeanMarie]

Bonjour

Regarde ce lien, si cela peut aider.
Lien supprimé

@+Jean-Marie

 

[FRANCKY]

merci pour votre aide,

Jean marie, ton post et ton fiichier semble correspondre a ce que je veux, mais cela me parait assez complexe a faire, n y aurait il pas une autre maniere de le faire?

Sylv900 ton code creer le graph mais moi mon graph est deja creer, ce qu il me faudrai c est assez simple j ai juste une colonne ou tous les jours je rentre des taux, si je configure mon graph de a1:a20 au bout de 20 saises mon graph ne m afficherai plus les nouvbeaux taux et il resterai sur les premliers '20' taux!

 

[JeanMarie]

Bonjour

Désolé je ne connais pas d'autre moyen.

Le plus compliqué est la formule de la plage nommée.

Place un fichier, pour que j'adpate cette fonctionnalité à ton cas.

@+Jean-Marie

 

[sylv900]

utilise une boucle du style :

nbligne = ActiveSheet.UsedRange.Rows.Count

for i=1 to nbligne
'ton code avec la variable i ç la place du nombre de ligne'
next


ou sinon fabrique ton graphe à partir de colonne entière et non d'une sélection fixe :


ActiveChart.SeriesCollection(1).XValues = '=Export!C1'

 

[Franky]

Bonsoir,

je recherche mon post depuis longtemps lol je viens juste de le retrouver!!!
Merci pour votre aide,

Jean marie je te met un lien pour recuperer mon fichier, je le post pas ici parcequ il est trop grop. Ce lien n'existe plus

Sur la page saise journee tu verras un tableau avec un gros bouton appele 'historique'. Dans ce tableau il a des cellule ou je rempli des taux et quand je klik sur historique ces taux vont dans la feuille historique. Un graph est affecte a chaque cellule du tableau historique, ces graph apparaissent en cliquant sur le bouton en face de la cellule en question, tu verras c'est pas complique c'est juste chaud a explique.

En tout cas merci de ton aide.

 

[JeanMarie]

Bonjour

Je n'arrive pas à récupérer ton fichier

Tu peux me l'envoyer sur jm.tschoffen suivi de l'arobase et de wanadoo.fr.

@+Jean-Marie

 

[francky]

re tout le monde,

le mail est parti jean marie.

 

[francky]

As tu bien recu mon mail jean marie?

 

[franky]

Toujours sans reponse 😱