Excel-Diagramm - Skalierung der Sekundärachse automatisch anpassen

1168
DavePenn

Ich habe 3 Pivot-Diagramme, die von einem Slicer gesteuert werden, der das Enddatum der Woche ändert. Auf dem Chart habe ich "Impressions" auf der Primärachse und "Klicks" auf der Sekundärachse.

Ich möchte, dass die Skalierung der Sekundärachse automatisch angepasst wird, wenn der Slicer gewechselt wird, so dass er immer gleich 2% der Primärachse ist. Auf diese Weise weiß ich, dass wir unser Ziel erreicht haben, wenn die Sekundärlinie über der Primärlinie liegt.

Hat jemand eine Idee, wie man das erreichen kann?

1
Ich glaube nicht, dass es dafür einen automatischen Weg geben würde. Sie müssen wahrscheinlich Makros dafür verwenden. Máté Juhász vor 6 Jahren 1
Großartig! Vielen Dank, dass Sie Ihre Bemühungen mit der Community teilen! Máté Juhász vor 6 Jahren 0

1 Antwort auf die Frage

1
DavePenn

Ich habe das Problem mit VBA und der Arbeitsblattänderungsfunktion gelöst

Private Sub Worksheet_Change(ByVal Target As Range)  Dim x As Long   With ActiveSheet.ChartObjects("Chart 1").Chart  ActiveSheet.ChartObjects("Chart 1").Activate ActiveChart.Axes(xlValue).MaximumScaleIsAuto = True ActiveChart.Axes(xlValue).MinimumScale = 0 x = ActiveChart.Axes(xlValue).MaximumScale ActiveChart.Axes(xlValue, xlSecondary).MaximumScale = (x * 0.02)  End With  End Sub

Verwandte Probleme