Bonjour tout le monde,
Je viens de me faire une petite macro qui devrait me permettre de figer l'intégralité des graphiques contenus dans un classeur. En m'inspirant de ce site je voulais boucler sur chaque feuille puis sur chaque graphique et enfin sur chaque série.
Or ma macro ne fonctionne pas correctement. Tantôt ça passe, tantôt ça bloque une série en particulier et ce sans que j'arrive à identifier la source de mon erreur.
Auriez vous une idée sur ce qui peut provoquer cela ?
En vous remerciant par avance pour votre précieuse aide.
Bonne soirée à tous
Edit : Je viens de faire des tests en jouant sur le type de variable de "Serie" et je n'obtiens pas toujours le même résultat. Peut être que mon problème vient de là mais je n'arrive pas à trouver le type correct.
Je viens de me faire une petite macro qui devrait me permettre de figer l'intégralité des graphiques contenus dans un classeur. En m'inspirant de ce site je voulais boucler sur chaque feuille puis sur chaque graphique et enfin sur chaque série.
Or ma macro ne fonctionne pas correctement. Tantôt ça passe, tantôt ça bloque une série en particulier et ce sans que j'arrive à identifier la source de mon erreur.
Code:
Sub test()
Dim Feuille As Worksheet
Dim Graph As ChartObject
'Dim Serie
For Each Feuille In ThisWorkbook.Sheets
For Each Graph In Feuille.ChartObjects
For Each Serie In Graph.Chart.SeriesCollection
Serie.name = Serie.name
Serie.Values = Serie.Values
Serie.XValues = Serie.XValues
Next
Next
Next
End Sub
Auriez vous une idée sur ce qui peut provoquer cela ?
En vous remerciant par avance pour votre précieuse aide.
Bonne soirée à tous
Edit : Je viens de faire des tests en jouant sur le type de variable de "Serie" et je n'obtiens pas toujours le même résultat. Peut être que mon problème vient de là mais je n'arrive pas à trouver le type correct.
Pièces jointes
Dernière édition: