XL 2013 Graphique auto adapté optimiser l'espace

[Excyann]

Bonjour à tous,

Je travaille sous excel 2013.
J'ai un graphique nuage de point qui s'adapte en "x" (dates heures) et en "y" (valeurs) en fonction des valeurs.
Ces valeurs sont obtenues par un filtre qui me permet de zoomer dans l'axe des "x" (du temps).

Mon problème est que par défaut mon graphique m'ajoute automatiquement un espace avant et après mes valeurs.
Je souhaite afficher ma série de donnée sur le graphique "façon plein écran" pour optimiser la lecture.

J'ai cherché, et je n'ai pas encore trouvé de solution.
Ci-dessous l'exemple qui vous montre les espaces à diminuer ou à supprimer car je me doute que sans sa ne doit pas être très clair pour tout le monde ...



Merci d'avance !

 

[Nairolf]

Re : Graphique auto adapté optimiser l'espace

Salut,

Je te propose le code vba suivant à mettre dans le code de la page concerné:

Private Sub Worksheet_Change(ByVal Target As Range)
    ActiveSheet.ChartObjects("Graphique 1").Activate
    ActiveChart.Axes(xlCategory).MinimumScale = Range("D3")
    ActiveChart.Axes(xlCategory).MaximumScale = Range("E3")
End Sub

Avec en D3 le x_min et en E3 le x_max ; Graphique 1 étant le nom du graphique de la page.

Lorsque tu changes la valeur le graphique "zoom" sur la plage de x sélectionnée en D3 et E3.