Format der y-Achse im Diagramm dynamisch

Hallo zusammen,
ich möchte ein Diagramm erstellen, bei dem der Nutzer über Optionsfelder auswählen kann, ob er die Werte absolut oder als Quote angezeigt bekommen möchte. Also z.B. wurden 3.000 Stück weniger als geplant verkauft oder 10% weniger.
Die Berechnung der Werte hat geklappt. In der Tabelle werden die Zahlen über eine bedingte Formatierung auch korrekt absolut bzw. als Prozentwert angezeigt.
Wenn ich nun darauf ein Diagramm erstelle, wird für die Einteilung der y-Achse nur die ursprüngl. Zellformatierung genutzt - unabhängig von der bedingten Formatierung. Hat von euch jemand eine Idee, wie man die Formatierung der Werte auf der y-Achse abhängig vom ausgewählten Optionsfeld (absolut oder relativ) gestalten kann?
Vielen Dank vorab für eure Unterstützung!
Viele Grüße Juliane

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells(1).Address(False, False) = "D4" Then With ActiveSheet.ChartObjects(1).Chart.Axes(xlValue) If Target.Value = "Quote" Then .TickLabels.NumberFormat = "0%" .Parent.SeriesCollection(1).DataLabels.NumberFormat = "0.0%" Else .TickLabels.NumberFormat = "#,##0" .Parent.SeriesCollection(1).DataLabels.NumberFormat = "#,##0" End If End With End If End Sub

Hi Berverly,
wie schon geschrieben ist es mit einem Dateiupload schwierig, die Datei zu anonymisieren würde viel Aufwand bedeuten. Ich habe selber noch etwas rumgespielt und ausprobiert und habe dabei fast, aber halt leider nur fast, eine Möglichkeit gefunden:

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("$AK$42").Value = 2 Then
ActiveSheet.ChartObjects("Diagramm 37").Activate
ActiveChart.Axes(xlValue).TickLabels.NumberFormat = "0,0%"
Else
ActiveSheet.ChartObjects("Diagramm 37").Activate
ActiveChart.Axes(xlValue).TickLabels.NumberFormat = "#.##0"
End If
Range("AK42").Select
End Sub

In AK42 steht entweder 1 für absolute Werte oder 2 für Prozentwerte.
Trage ich diese Zahlen händisch ein, funktioniert der Code. Das Problem ist, dass der Anwender über Optionsfelder diese Wahl trifft und das Ergebnis davon als 1 oder 2 in der Zelle AK42 ausgegeben wird. Ändert sich der Wert der Zelle AK42 nur durch das Betätigen der Optionsfelder, ändert sich an der Formatierung der y-Achse leider nichts.
Wie kann man denn mein Beispiel oder deinen Vorschlag abändern, damit die Auswahl mit den Optionsfeldern berücksichtigt wird?
Vielen Dank für deine Unterstütung!

Beliebteste Forumthreads (12 Monate)

Format der y-Achse im Diagramm dynamisch

12
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

94 Forumthreads zu ähnlichen Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Format der y-Achse im Diagramm dynamisch

12 Beiträge zum Forumthread Beiträge zu diesem Forumthread

94 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

12
Beiträge zum Forumthread

Beiträge zu diesem Forumthread