Passage à 2007 : Pb sur ChartObjects

Bonjour à tous

J'utilise une macro qui modifie un graphe intégré dans une feuille. Cette macro fonctionne sur Excel 2002 et 2003. mais plus sur Excel 2007!
Le message d'erreur est :

Citation:

---

erreur d'exécution '1004' :
Erreur définie par l'application ou par l'objet

---

Voici le bout de code. Le débuggeur indique que la ligne qui plante est la seconde (ActiveSheet.ChartObjects(1).Activate). J'ai également essayé avec le nom du graphe (ActiveSheet.ChartObjects("Graphique 1").Activate)

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Sheets("FEUILLE 1").Activate ActiveSheet.ChartObjects(1).Activate ActiveChart.Axes(xlValue).MinorGridlines.Select With ActiveChart.Axes(xlValue) .MinimumScale = MinScale .MaximumScale = MaxScale .MinorUnit = MaxUnit / 2 .MajorUnit = MaxUnit .Crosses = xlCustom .CrossesAt = 0 .ReversePlotOrder = False .ScaleType = xlLinear End With

---

Quelqu'un aurait-il une idée sur la façon dont je pourrais résoudre le problème?
Merci d'avance pour votre aide

J'ai mis à jour Excel 2007 en passant au Service Pack 2, la réaction au code n'est plus la même :

Citation:

---

Erreur d'exécution '-2147467259 (80004005):'
La méthode 'Select' de l'objet 'Axis' a échoué

---

C'est cette fois la troisième ligne du code qui fait planter la macro...

Code:

---

ActiveChart.Axes(xlValue).MinorGridlines.Select

---

Quelqu'un comprendrait-il ce qu'il faut faire?
merci d'avance