ich würde gerne in einem XY-Diagramm die Skalierung der Achse(n) automatisch und in Abhängigkeit der Werte anpassen lassen. Hat jemand eine Idee, wie das gehen könnte?
Danke
Rolf
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$2" Then
With ActiveSheet.ChartObjects(1).Chart.Axes(xlValue)
.MinimumScaleIsAuto = False
.MinimumScale = WorksheetFunction.Min(Columns(2)) 'Y-Werte in B
End With
End If
End Sub