Sub AchseAnpassen()
With ActiveSheet.ChartObjects(1).Chart
.Axes(xlCategory).MaximumScale = Application.Max(Columns(1))
End With
End Sub
AW: Nur per VBA...
09.02.2016 15:27:13
Jens
Halo besten Dank.
was ist aber wenn die Datensätze für das Diagramm auf einem anderen Tabellenblatt liegen und ich mehrere Diagramme habe?
Wie muss man dann den Code anpassen?
Anzeige
AW: Nur per VBA...
09.02.2016 19:58:01
Beverly
Hi,
dann solltest du mal deine Mappe mit den tatsächlichen Bedingungen hochladen.