Echelle de graphique de l'axe des ordonnées dynamique

[julien 07]

Bonjour à tout le monde,

Je cherche à réaliser un diagramme de gantt automatiquement pour visualiser les dépassements de contrats et savoir à quelle échéance renouveler les autres.

Le graphique se fait correctement et est dynamique grâce à fonction Décaler, mais ce qui me manque c'est l'automatisation de l'échelle de l'axe des ordonnées. Je souhaiterais que la valeur minimum soit celle de la cellule M3 et la valeur maximum soit celle de la cellule M4.

J'ai déjà fait une macro pour trier les contrats par date mais je n'arrive pas à y intégrer cette condition que je fait pour l'instant à la main.

Je vous remercie par avance de votre aide.

Cordialement,

Julien

 

[CB60]

Re : Echelle de graphique de l'axe des ordonnées dynamique

Bonjour
Tu peux peut être ajouter cela dans ta macro?

    ActiveSheet.ChartObjects(1).Activate
    With ActiveChart.Axes(xlValue)
        .MinimumScale = Range("M3").Value
        .MaximumScale = Range("M4").Value
    End With

 

[julien 07]

Re : Echelle de graphique de l'axe des ordonnées dynamique

Bonjour CB60,

merci beaucoup, c'est exactement ça que je voulais et ça marche comme il faut, c'est super.

Julien