problème lors de la création de graphique
bonjour, je rencontre un problème me laissant dubitatif :
je crée un graph avec ce code :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
Sheets("saisie").Activate
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlColumnClustered
ActiveChart.Location where:=xlLocationAsObject, Name:="saisie"
With ActiveChart
.HasTitle = True
.ChartTitle.Caption = "RPE 3 dernières semaines"
.ChartTitle.Font.size = 17
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
.HasLegend = False
End With |
le problème est le suivant : j'ai l'impression que le code s'execute de façon aléatoire, je m'explique. Si je modifie la taille du titre (ligne ".ChartTitle.Font.size = 17" ), il va peut-être falloir que le lance la macro 3 fois pour que cela soit prise en compte, et je ne comprends absolument pas pourquoi.
est-ce que vous voyez une éventuelle cause à ce sujet?
merci.
