Bonjour
Je cherche à ajuster automatiquement les bornes d'un graphique de type histogramme.
J'y arrive sur l'axe Y avec mes cellules j3 et K3 et l'unité en j4 mais pas en X....
Mes cellules j2 et k2 gèrent les bornes en X. Ce sont des valeurs numériques
Pouvez-vous m'aider ?
Private Sub Worksheet_Change(ByVal target As Range)
If target.Count > 1 Then Exit Sub
ActiveSheet.ChartObjects(1).Activate
With ActiveChart
.Axes(xlValue).MinimumScale = Range("j3").Value
.Axes(xlValue).MaximumScale = Range("k3").Value
.Axes(xlValue).MajorUnit = Range("j4").Value
.Axes(xlCategory).MinimumScale = Range("j2").Value
Axes(xlCategory).MaximumScale = Range("k2").Value
End With
End Sub