Bonjour,

J'ai une feuille Excel qui a été créée sous 2000 avec un graphique qui se remplit au chargement de la feuille par macro.

Qand on l'ouvre sous 2000, pas de problème.

Or sous 2007, la légende empiète sur le graph.

Une des solutions que j'ai trouvée pour corriger le problème sous 2007 est de faire :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
If CInt(Left(Application.Version, InStr(1, Application.Version, ".") - 1)) = 12 Then
            ActiveSheet.ChartObjects(1).Activate
            ActiveChart.ApplyLayout (4)
            ActiveChart.Legend.Position = xlLegendPositionRight
End If
Du coup ca marche sous 2007.

Mais sous 2000, la méthode "ApplyLayout" n'existe pas et il me fait une erreur dans mon code VBA.

Auriez vous une solution pour le forcer ou pour contourner ce problème ?

Merci d'avance