Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 14:48:50
"Eingabefeld" zwischen zwei Zeilen geht nicht weg.
24.04.2024 14:40:10
Zeilenumbrüche in Textbox zählen
24.04.2024 14:06:20
Gesamte Column löschen, wenn Column-Bereich leer
24.04.2024 13:44:05
Bezeichnung Tabellenblatt aus Zelle für Formel auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1608to1612
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1608to1612
1608to1612
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Legende im Diagramm mit VBA bearbeiten

Legende im Diagramm mit VBA bearbeiten
26.02.2018 07:28:27
Michaael
Hallo Zusammen,
ich verzweifele an folgender Aufgabenstellung:
In einem Diagramm habe ich sechs Datenreihen. Die Datenreihen können über ein Kontrollkästchen aktiviert oder deaktiviert werden (bei deaktivierten Kontrollkästchen werden alle Werte auf NV gesetzt und die Datenreihe dadurch nicht angezeigt!)
Wenn ich nun drei Datenreihen deaktiviere, so bleiben aber in der Legende diese Reihen erhalten.
Ist es über VBA möglich, die deaktivierten Datenreihen auch in der Legende zu entfernen?
Im Bereich A1:A6 sind die Ausgabewerte der Kontrollkästchen (Wahr oder Falsch) für die sechs Datenreihen.
Vielen Dank für Eure Unterstützung.
Michael

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

Betreff
Datum
Anwender
Anzeige
AW: Legende im Diagramm mit VBA bearbeiten
26.02.2018 07:30:27
Hajo_Zi
Hallo Michael,
ich bin nicht der Diagrammmensch aber:
nur wenige schauen auf Deinen Rechner und sehen die Datei.
Ich möchte gerne den Fehler im Original sehen.
Ich baue keine Datei nach. Die Zeit hat schon jemand investiert.
Ein Nachbau sieht meist anders aus als das Original. Darum sollte das Original verlinkt werden.
Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten anonymisieren bzw. pseudonymisieren.

Anzeige
AW: Demodatei eingestellt
26.02.2018 08:42:38
Rainer
Hallo Michael,
eine Möglichkeit wäre es die Datenreihen per VBA zu löschen und neu zu erstellen.
Dazu musst du aber das gesamte Diagramm neu erstellen und im Hintergrund den Macrorecorder aktivieren. Dann hat er alle Befehle bis auf "Delete". Den Code dann bitte hochladen zum Makro-Bau.
Einfacher ist es mit Office 2013, da kann man im Menu "Datenquelle auswählen" schon per Checkbox einzelne Graphen ausblenden, genauso wie du es die vorstellst. (Mein) Office 2010 hat diese Option leider nicht.
Gruß,
Rainer
Anzeige
Frage
26.02.2018 09:22:36
Michaael
Hallo Rainer,
ist es nicht möglich, die Elemente im Bereich Legende via Makro "anzusprechen"?
Gruß
Michael
AW: Frage
26.02.2018 10:11:17
Rainer
Hallo Michael,
ich habe zu kompliziert gedacht. Nimm Beverly's Lösung. Du hast sogar eine extra Tabelle nur für Diagramm angelegt, besser und einfacher wird es nicht.
Folgender Code in deinem Tabellenblatt: 

Option Explicit
Private Sub CheckBox2016_Click()
Sheets("D6 Gaspreise Dia").Columns(12).Hidden = Not (CheckBox2016.Value)
End Sub
Private Sub CheckBox2017_Click()
Sheets("D6 Gaspreise Dia").Columns(13).Hidden = Not (CheckBox2017.Value)
End Sub
Private Sub CheckBox2018_Click()
Sheets("D6 Gaspreise Dia").Columns(14).Hidden = Not (CheckBox2018.Value)
End Sub
Private Sub CheckBox2019_Click()
Sheets("D6 Gaspreise Dia").Columns(15).Hidden = Not (CheckBox2019.Value)
End Sub
Private Sub CheckBox2020_Click()
Sheets("D6 Gaspreise Dia").Columns(16).Hidden = Not (CheckBox2020.Value)
End Sub
Private Sub CheckBox2021_Click()
Sheets("D6 Gaspreise Dia").Columns(17).Hidden = Not (CheckBox2021.Value)
End Sub
Private Sub CheckBox2022_Click()
Sheets("D6 Gaspreise Dia").Columns(18).Hidden = Not (CheckBox2022.Value)
End Sub
'alt
Private Sub Worksheet_Calculate()
With Tabelle11.ChartObjects(1).Chart.Axes(xlValue)
.MinimumScale = Range("rG1.Min")
.MaximumScale = Range("rG1.Max")
.ScaleType = xlLinear
.DisplayUnit = xlNone
End With
End Sub

Anzeige
kleines Folgeproblem
26.02.2018 10:23:07
Michael
Hallo Rainer,
vielen Dank für Deinen Code.
Funktioniert im Prinzip, so wie gewünscht.
Es gibt nur noch ein kleines Problem, welches ich nicht lösen kann:
Wenn man das Jahr 2016 deaktiviert, dann wird die Skalierung der horizontalen Achse "zerstört". Es werden dann Datumsangaben von 1900 angezeigt und übermäßig viele vertikale Hilfslinien eingeblendet.
Hast Du eine Idee, woran das liegen könnte?
Vielen Dank für Deine Unterstützung.
Gruß
Michael
Diagramm Datenreihen ein-/ausblenden
26.02.2018 10:24:00
Beverly
Hi Rainer,
du kannst ab Excel2013 zwar die von dir erwähnte Methode zum Ein-/Ausblenden einzelner Graphen anhand der CheckBoxen im Diagramm von Hand ausführeren, nicht jedoch per VBA.

Anzeige
AW: Diagramm Datenreihen ein-/ausblenden
26.02.2018 10:36:28
Rainer
Hallo Beverly,
ja, das Problem habe ich auch entdeckt.
Gruß,
Rainer
AW: Legende im Diagramm mit VBA bearbeiten
26.02.2018 08:45:57
Beverly
Hi Michael,
der einfachste Weg ist, wenn du die betreffenden Zeilen/Spalten im Tabellenblatt ausblendest.

Folgeproblem
26.02.2018 09:20:09
Michaael
Hallo Karin,
das Ausblenden der deaktivierten Spalten wäre eine Lösung, wenn nicht beim Ausblenden der Spalte L die Skalierung der horizontalen Achse kaputt geht. Es werden keine gültigen Datumsangaben mehr vorgenommen. Ich finde den Fehler nicht.
Vielen Dank und Gruß
Michael
AW: Folgeproblem
26.02.2018 10:14:25
Rainer
Hallo Michael,
dein Fehler ist, dass nur Datenreihe 1 eine X-Achse defniert hat!
=DATENREIHE('D6 Gaspreise Dia'!$L$11,'120060.xlsb'!rG1.Datum_dynamisch,'120060.xlsb'!rG1. _
Daten_2016,1)
=DATENREIHE('D6 Gaspreise Dia'!$Q$11,,'120060.xlsb'!rG1.Daten_2021,2)
Weise allen Datenreihen die gleiche X-Achse zu!
Gruß,
Rainer
Anzeige
PRIMA!
26.02.2018 10:24:30
Michael
Hallo Rainer,
das werde ich sofort ändern!
Vielen Dank auch un Gruß
Michael

79 Forumthreads zu ähnlichen Themen

Säulen verkürzen bei Diagrammen mit hohen Werten
Ingo

Hallo zusammen,
ich habe ein Diagramm mit drei Werten, wobei der dritte Wert ein Vielfaches der übrigen beiden Werte ausmacht.
Damit ich bei den anderen Säulen nicht nur Striche an der x-Achse habe, würde ich das Diagramm gern so skalieren, dass der Mittelteil praktisch herausgeschnitte...
19.08.2008 09:42:00
Thread-ID: 1002809
4 Beiträge
Anzeige
Diagramm mit falschen Werten/Datum
excel@goergler.de

Hallo zusammen,
zum folgenden Problemfall benötige ich Hilfe:
eine in Excel 2003 erstellte Datei wird im Kompatibilitätsmodus von Excel 2007 bearbeitet und anschließend die Verknüpfung zu einer anderen Exceldatei, in der die Basisdaten für ein Diagramm enthalten sind, gelöscht. Nach d...
04.11.2008 09:27:00
Thread-ID: 1021475
3 Beiträge
Legendeneintrag im Diagramm löschen
Tobias

Hallo,
ich habe folgendes Problem. Aus mir immer wieder vorliegenden und veränderten Messwerten größer 32.000 habe ich per Makro ein Diagramm erstellt. Da Excel nicht mehr als 32.000 Werte darstellt, habe ich einfach mehrere Datenreihen erstellt und diese aneinandergefügt. So entstehen bei...
23.07.2009 15:27:23
Thread-ID: 1090336
2 Beiträge
Anzeige
Nullwerte im Diagramm nicht anzeigen
Stephan

Hallo,
habe jetzt schon ne ganze weile im Forum nach einer passenden Lösung gesucht und nicht gefunden.
Nun mein kleines Problem.
Ich möchte lediglich im Diagramm selber alle Balken die den Wert 0 haben nicht anzeigen. Also die 0 einfach ausblenden. Habe auch das mit dem Wert #NV od...
10.04.2010 19:51:41
Thread-ID: 1150986
2 Beiträge
Diagramm mit abweichenden Werten (Jahressumme)
biber

Hallo,
Ich habe Lagermieten für 4 Jahre von Januar bis Dezember und die zugehörigen Summen. Diese Werte werden in einem Linien-Diagramm dargestellt. Die Werte sollen in einer Tabelle unterhalb des Diagramms angezeigt werden.
Die Jahressummen lasse ich nun als Säulen über die Sekundärac...
23.06.2010 08:53:30
Thread-ID: 1163568
5 Beiträge
Excel Diagramme mit Schwellenwerten
Dietmar

Hallo in die Runde,
ich tüftele schon eine ganze Weile und finde die Lösung nicht.
Ich möchte zwei Diagramme erstellen, das aus folgenden Werten besteht: Tabelle 1 Zeitraum Verkauf-Ist Schwelle1 Schwelle2 Schwelle3 Schwelle4 1. Quartal 40 30 39 59 70 2. Quartal 67 30 39 59 70 3. Quarta...
13.11.2010 21:26:38
Thread-ID: 1186683
4 Beiträge
Diagramm mit Schwellenwerten
Dietmar

Hallo zusammen,
leider ist es mir noch nicht gelungen, das Diagramm hinsichtlich der Schwellenwerte so zu gestalten, dass die Bereiche der Schwellenwerte (=Flächen) ganz links und ganz rechts im Diagramm beginnen. Ich hatte dieses Anliegen hier bereits schon einmal gepostet.
Wenn ich de...
21.12.2010 12:46:29
Thread-ID: 1192346
4 Beiträge
Nullwerte im Diagramm nicht anzeigen
Savarol

Hai Leute,
ich stehe kurz vor dem mentalen Suizid. Ich versuche ein Säulendiagramm aus einer Liste zu erstellen, die #NV-Werte enthält. In den Zellen ist eine WENN(A1>0;A1;#NV) drin. Ich habe das in einer 2003-Mappe, da funktioniert es, kann es aber selbst da nicht reproduzieren (trotz E...
10.02.2011 10:03:12
Thread-ID: 1200009
3 Beiträge
Anzeige

Links zu Excel-Dialogen

CheckBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
3
2
1
3
1
4
3
3
2
8
3
5
6
1
1
7
10
13
3
12
3
2
5
3