[VBA-E] sauvegarde de graphique
bonjour a tous
je suis debutant dans la programmation en VBA E et je suis confronter a un petit probleme
dans la macro je demande a excel de me tracer une courbe avec un tableau de point
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| nom = InputBox("nom de la courbe", "nom de la courbe", "f(x)")
Range("C2:C33").Select
Charts.Add
ActiveChart.ApplyCustomType ChartType:=xlBuiltIn, TypeName:="Courbe avec lissage"
ActiveChart.SetSourceData Source:=Sheets("Feuil1").Range("C2:C33"), PlotBy:=xlColumns
ActiveChart.Location Where:=xlLocationAsObject, Name:="Feuil1"
With ActiveChart
.HasTitle = True
.ChartTitle.Characters.Text = nom
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With
ActiveChart.HasLegend = False
ActiveWindow.Visible = False
Application.WindowState = xlMinimized
Application.WindowState = xlNormal |
seulement dans la suite de mon programme certaines manipulations me permettent de changer les valeurs du tableau
Or par consequent ma courbe change immediatement
j'aimerai pouvoir garder sur ma feuille la courbe d'origine
je vous remerci de votre attention
