Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
25.04.2024 12:55:42
Funktionsparameter auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1232to1236
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
1232to1236
1232to1236
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Werte im Diagramm mittels Auswahlmenü anzeigen

Werte im Diagramm mittels Auswahlmenü anzeigen
Kai
Hallo zusammen,
ich habe eine Excelliste mit mehreren Dutzend Artikeln. Ich möchte nun ein Diagramm erstellen und über ein Auswahlmenü einen oder mehrere Werte im Diagramm angezeigt bekommen.
Habe zwar auch die Möglichkeit, die Auswahl über den Filter zu steuern, da die Werte und das Diagramm in getrennten Tabellenblätter sind, wäre es mir Lieber, wenn ich die Steuerung direkt im Diagramm vornehmen könnte.
https://www.herber.de/bbs/user/77202.xlsx
Danke schon einmal im Voraus :)
Viele Grüße
Kai
AW: Werte im Diagramm mittels Auswahlmenü anzeigen
26.10.2011 11:18:52
Beverly
Hi Kai,
nach welcher Spalte willst du "filtern"?

AW: Werte im Diagramm mittels Auswahlmenü anzeigen
26.10.2011 11:21:40
Kai
Hi,
nach der Spalte B - Beschreibung.
Gruß
Kai
AW: Werte im Diagramm mittels Auswahlmenü anzeigen
26.10.2011 14:07:48
Kai
Hallo Karin,
danke für die Info. Habe das Makro entsprechend auf meine Tabelle abgeändert. Beim Start erhalte ich die Meldung "Die List-Eigenschaft des DropDown-Objektes kann nicht festgelegt werden." und es wird der Code
Worksheets("Diagramm").Shapes("DropDown 1").ControlFormat.List = varBereich
markiert.
Wenn ich die Meldung ignoriere und dennoch einen Wert im Menü aufrüfe erscheint die Meldung "Typen unverträglich."
strKriterium = varBereich(ActiveSheet.Shapes(Application.Caller).ControlFormat.Value - 1)
Habe ich evtl. beim ändern etwas übersehen?
Viele Grüße
Kai
Anzeige
AW: Werte im Diagramm mittels Auswahlmenü anzeigen
26.10.2011 14:56:26
Beverly
Hi Kai,
du musst die Arbeitsmappe erst schließen und dann erneut öffnen - mit dem Code im Workbook_Open Ereignis wird die Variable varBereich gefüllt.

AW: Werte im Diagramm mittels Auswahlmenü anzeigen
26.10.2011 15:15:57
Kai
Hallo Karin,
es funktioniert jetzt, nachdem ich die Daten noch einmal in die Tabelle hineinkopiert habe. Recht herzlichen Dank. Kann ich eigentlich noch irgendwie über einen Button die Auswahl wieder zurücksetzten?
Viele Grüße
Kai
AW: Werte im Diagramm mittels Auswahlmenü anzeigen
26.10.2011 15:50:59
Beverly
Hi Kai,
man könnte die Überschrift in B5 mit in die Auswahl einbeziehen und wenn diese ausgewählt wird, dann alle einblenden. Dazu müsstest du den Code wie folgt ändern:

Private Sub Workbook_Open()
Dim objDic As Object
Dim lngZaehler As Long
Set objDic = CreateObject("Scripting.Dictionary")
With Worksheets("Tabelle1 (2)")
.Range("$A$5:$P$8").AutoFilter
varBereich = .Range(.Cells(5, 2), .Cells(IIf(IsEmpty(.Cells(.Rows.Count, 1)), .Cells(. _
Rows.Count, 1).End(xlUp).Row, .Rows.Count), 2))
End With
For lngZaehler = LBound(varBereich) To UBound(varBereich)
objDic(varBereich(lngZaehler, 1)) = 0
Next lngZaehler
Erase varBereich
varBereich = objDic.keys
Worksheets("Tabelle1").Shapes("DropDown 1").ControlFormat.List = ""
Worksheets("Tabelle1").Shapes("DropDown 1").ControlFormat.List = varBereich
End Sub


Sub Filtern()
Dim strKriterium As String
With ActiveSheet.Shapes(Application.Caller)
strKriterium = varBereich(ActiveSheet.Shapes(Application.Caller).ControlFormat.Value - 1)
If .ControlFormat.Value = 1 Then
Worksheets("Tabelle1 (2)").Range("$A$5:$P$8").AutoFilter Field:=2
Else
Worksheets("Tabelle1 (2)").Range("$A$5:$P$8").AutoFilter Field:=2, Criteria1:= _
strKriterium
End If
End With
End Sub


Anzeige
AW: Werte im Diagramm mittels Auswahlmenü anzeigen
28.10.2011 08:16:21
Kai
Guten Morgen Karin,
super. Vielen Danke für deine Hilfe. :)
Wünsche dir ein schönes Wochenende.
Gruß
Kai

305 Forumthreads zu ähnlichen Themen

Diagrammtitel auslesen
WolfgangN

Hallo,
Ich möchte mir gern alle Diagrammnamen und in der Spalte daneben den dazugehörenden Diagrammtitel anzeigen lassen. Ich wollte dafür das nachstehende Makro nutzen. Die Auflistung der Namen erfolgt anstandslos, aber die Auflistung der Titel erzeugt immer Fehler.
Ich würde mich sehr...
22.08.2008 15:09:13
Thread-ID: 1003909
3 Beiträge
Anzeige
gestapeltes Säulendiagramm mit Summen?
Wolfango

Hallo zusammen,
ich habe ein "gestapeltes Säulendiagramm" (absolute Werte, unterschiedlich hohe Säulen; nicht auf 100% gerechnet).
Nun möchte ich gleichzeitig auch noch die Summen der jeweiligen Säulen darstellen (als Linie oder einfach nur die Summenwerte oberhalb der jeweiligen gest...
28.08.2008 14:39:27
Thread-ID: 1005447
6 Beiträge
Select Diagramm entfernen
WolfgangN

Hallo,
in Tabelle6 sind Tabellen und Diagramme, in Tabelle7 nur Tabellen. Ich suche beim aktivieren der Tabelle6 in Tabelle7 ein Datum (der1.des Monats) dies funktioniert bis auf einen Fall gut. Ist in Tabelle6 irgendein Diagramm selectiert worden, danach wird eine andere Tabelle aktiv, dan...
28.08.2008 20:31:23
Thread-ID: 1005588
3 Beiträge
Anzeige
Diagramm mit stündlicher Skalierung/X-Achse
Jan

Hallo zusammen,
ich möchte in Excel ein Diagramm erstellen. Allerdings will ich bei der Zeitachse (X-Achse) eine Unterteilung in Stunden (nicht wie üblich in Tagen).
Ist das möglich ?
Vielen Dank im voraus !
Gruss Jan
08.09.2008 12:29:00
Thread-ID: 1008115
2 Beiträge
Diagramm aktualisiert sich nicht!
Mike

Hallo,
ich habe das Problem, daß mir in einem Diagramm die Werte nicht aktualisiert werden!
Die Werte der Tabelle, welche dem Diagramm zugrunde liegen, aktualisieren sich beim berechnen!!!
?
Gruß aus Bayern
Mike
10.09.2008 16:42:00
Thread-ID: 1008848
4 Beiträge
Formel lässt sich nicht aufzeichnen
David

Hallo zusammen,
ein User, dem ich helfen möchte, soll für mich eine Formel aufzeichnen, damit ich die "Übersetzung" in VBA mit meinem Makro vergleichen kann. Allerdings weigert sich der Rekorder, diese Formel aufzuzeichen. Wenn er gestartet wird und dann die Array-Formel mit STRG-SHIFT-ENTE...
22.09.2008 11:13:00
Thread-ID: 1011409
7 Beiträge
Diagramm mit wenigen Werten -> Zwischenwerte
Robin

Hey Cracks,
ich zerbreche mir grad den Kopf über folgender Frage:
Ich habe eine gemessene Federkennlinie, von der ich nur ein Bild der Kennlinie habe, aber keine Messwerte.
Also hab ich eine handvoll Werte rausgelesen und daraus ein interpoliertes x-y-Diagramm erstellt, das auch ga...
25.09.2008 16:34:00
Thread-ID: 1012380
4 Beiträge
Linienstärke im Diagramm per VBA
PeTeR

Hallo VBA-Freaks,
wie kann man per VBA die Linienstärke einer Datenreihe im Diagramm festlegen?
ActiveChart.SeriesCollection(1).Border.Weight = 5 funzt nicht!
Irgendwie fehlt mir das richtige Objekt!
(Der Makrorekorder in 2007 peilt das auch nicht!!)
Vielen Dank für Eur Hilf...
25.09.2008 17:24:43
Thread-ID: 1012389
6 Beiträge
Anzeige

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
2
2
5
2
10
1
3
6
3
5
14
2
6
2
2
1
13
6
1
2
3
4
4
1
6