Discussion :

[baba7414]

Salut tout le monde,

j'ai un leger probleme je cherche a generer automatiquement des graph avec trois serie sur chaque et dont j'ai uniquement les ligne et non ligne plus marker a chaque point

dans excel pour le faire c : format data serie > pattern> marker et selectioner none

comment le faire en VBA a la generation du graph

voici mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 Dim chtChart As Chart
   'Create a new chart.
   Set chtChart = Charts.Add
   With chtChart
      .Name = titre
      .ChartType = xlXYScatterSmooth
      'Link to the source data range.
 
 
      .HasTitle = True
      .ChartTitle.Text = titre1
      .Axes(xlCategory, xlPrimary).HasTitle = True
      .Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "time"
      .Axes(xlValue, xlPrimary).HasTitle = True
      .Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "tide (m)"
 
 
   End With

je serait tres heureux que l'un de vous me debloque.

++
bat

[DeaD78]

Bonjour,

Je ne connais pas trop ce dont tu parles sous Excel.

Par contre, ce que je sais, c'est que, vu que tu sais le faire sous Excel, tu lances ton enregistreur de macros (Outils/Macro/Nouvelle macro), tu fais ton

format data serie > pattern> marker et selectioner none

puis tu l'arrêtes. Après ça, tu vas voir dans dans ton module créé (Alt + F11) le code correspondant et tu l'intègres.

As-tu déjà fait ça ?

[baba7414]

bonjour,

oui j'ai deja essayer mais j'essaye en fait de le faire au moment de la creation du graph. et le code cree avec l'enregistreur de macro ne marche pas dans ce cas

[DeaD78]

Alors là, je ne te suis plus.

Le code créé avec l'enregistreur ne fonctionne pas ? Ce n'est pas possible. Ce code fait exactement ce que tu as fait à la main. Va falloir m'expliquer

Fais nous voir le code créé par l'enregistreur pour l'action que tu as décrite. Et surtout, place le juste après ta création de graphe (niveau code).