Anzeige
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 Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Werte im Diagramm mittels Auswahlmenü anzeigen

Forumthread: 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
Anzeige
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 12:27:23
Beverly
Hi Kai,
im Anhang eine Möglichkeit.
https://www.herber.de/bbs/user/77208.xlsm

Anzeige
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
Anzeige
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

Forumthreads zu verwandten 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
Auswählen einer Zelle sofort mit X kennzeichnen.
Richard

Hallo,
ich habe folgenden Code geschrieben: Wenn ich Zelle A1 auswähle, dann soll er dort ein X reinsetzten, steht da schon ein X dann soll er es wieder rausnehmen.
Jetzt kommt 'ne ganz blöde Frage: Wie definiere ich einen ganzen Bereich indem er das machen soll? Zum Beispiel A1:B100. S...
22.08.2008 15:12:33
Thread-ID: 1003911
3 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 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
Anzeige
Arbeitsblätter UND Diagrammblätter drucken
th.heinrich

Bestes Forum,
Mit diesem Beispiel von Hans können Arbeitsblätter in einer User-Form zum Druck gewählt werden.
Option Explicit
Private Sub cmdAbbrechen_Click() Unload Me End Sub
Private Sub cmdDrucken_Click() Dim arrWks() Dim iCounter As Integer, iCount As Integer For iCount...
29.09.2008 15:12:24
Thread-ID: 1013131
15 Beiträge
Anzeige
Diagramme fortschreiben
hindenberger@gmx.de

Hallo,
ich hab wahrscheinlich eine klassische Frage, aber dennoch nochmal:
Gibt es in Excel die Möglichkeit, Diagramme dynmische fortzuschreiben. Dh. wenn ich neuen Zellen ergänzen, dass das Diagramm sich erweitert.
Danke
Gruß,
Patric
26.10.2008 09:31:43
Thread-ID: 1019308
3 Beiträge
3D Diagramm erstellen aus Matrix
Kay

Hallo,
Ich habe in Excel eine Matrix, die folgendermaßen aufgeteilt ist
A B C D
15 12% 10% 15% 20%
30 10% 13% 17% 19%
45 8% 12% 15% 17%
Wie bekomme ich es nun hin, dass mir auf der Größenachse alle %-Werte, auf der Rubrikenachse die Zeile...
29.10.2008 21:38:38
Thread-ID: 1020422
7 Beiträge
Rubrikachse formatieren bei Diagrammen
Hans

Hallo,
kann mir jemand bei der Erstellung von Diagrammen helfen, die ohne erkennbaren Grund einmal auf der Rubrikachse (X-Achse) fortlaufende Ziffern z. B. 1, 2, 3, ... n, dann wieder die tatsächlichen Werte aus einer Tabelle zeigen. Wichtig wäre, daß im Diagramm immer die Werte aus der Tab...
30.10.2008 11:17:54
Thread-ID: 1020534
3 Beiträge
Diagramm mit 3 Achsen
Karen

Hallo Forum,
ich möchte ein Diagramm mit drei Achsen darstellen (siehe Anhang) - eine Datenreihe per Säule (Prozent), die andere per Linie (ganze Zahlen). Leider bekomme ich die dritte Achse nicht in das Diagramm.
Kann mir jemand den entscheidenen Tip geben?
Vielen Dank im voraus....
06.11.2008 08:52:00
Thread-ID: 1022148
2 Beiträge
Diagramm automatischerweitern
harald

Hallo,
ich habe mal wieder ein Problem: In Tabelle1 (Daten) sollen für jeden Tag seit der letzten Aktualisierung 24 Werte hinzugefügt werden (geschieht über Kopieren und Einfügen).
Dabei sollte in Tabelle2 (Diagramm) automatisch ein Liniendiagramm mit allen Werten erzeugt werden.
We...
11.11.2008 21:10:25
Thread-ID: 1023667
14 Beiträge
Diagramm-Erstellung - Monatsauswahl beschränkt?
Stefanie

Hallo zusammen,
ich würde gernen einen 12 Monatsvergleich von Beständen machen. Hier habe ich ein Liniendiagramm verwendet. Jedoch klappt das bei den Reihenwerten nur bis zum Juli- den August und ff nimmt er nicht mehr.
Weiss jemand an was dies liegen könnte?
Vielen Dank vorab,
...
20.11.2008 11:44:35
Thread-ID: 1026358
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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