Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 11:29:24
Algorhitmus, der kleinste Summe von Zahlen berechnet
15.10.2025 10:27:00
Zusammenführen / Synchronisieren von zwei Dateien
15.10.2025 09:51:49
Wenns mit Zahl und Buchstaben
15.10.2025 08:22:15
Privat Sub ObjExcel_Sheet Change....deaktivieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1108to1112
1108to1112
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Problem beim Erstellen von Diagrammen

Forumthread: Problem beim Erstellen von Diagrammen

Problem beim Erstellen von Diagrammen
Diagrammen
Ich erstelle 2 Diagramme aus einem Datensatz.
Beim ersten hängen die Daten und die Titelzeile zusammen: 

Range("A1:U12").Select
Selection.SpecialCells(xlCellTypeVisible).Select		' jede 2. Spalte ist ausgeblended
Charts.Add
ActiveChart.Name = "Titel 1"
ActiveChart.ChartType = xlColumnStacked

Beim zweiten liegen die Daten und die Titelzeile auseinander: 

Range("A13:U21, A1:U1").Select
Selection.SpecialCells(xlCellTypeVisible).Select		' jede 2. Spalte ist ausgeblended
Charts.Add
ActiveChart.Name = "Titel "
ActiveChart.ChartType = xlColumnStacked

Beim ersten Diagramm wird
- Spalte 1 zur X-Achse
- Zeile 1 zur Legende
beim zweiten
- Spalte 1 zur Legende
- Zeile 1 zur X-Achse
Was muß ich eintragen, dass das 2. Diagramm wie das erste aussieht?
Gruß Werner.
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Problem beim Erstellen von Diagrammen
27.10.2009 11:13:18
Diagrammen
Hi Werner,
ich kenne deine Arbeitsmappe nicht, aber vielleicht kannst du das Probem so lösen: 
Sub DiaErstellen1()
Dim inReihe As Integer
Charts.Add
With ActiveChart
If ActiveChart.SeriesCollection.Count > 0 Then
For inReihe = .SeriesCollection.Count To 1 Step -1
.SeriesCollection(inReihe).Delete
Next inReihe
End If
.Name = "Titel 1"
.ChartType = xlColumnStacked
Worksheets("Tabelle1").Range("A1:U12").SpecialCells(xlCellTypeVisible).Copy ' hier kann  _
Bereich variiert werden
.SeriesCollection.Paste Rowcol:=xlRows, SeriesLabels:=False, _
CategoryLabels:=False, Replace:=False, NewSeries:=True
.SeriesCollection(1).XValues = Worksheets("Tabelle1").Range("A1:U1")  '  _
Achsenbeschriftung
End With
End Sub

Tabellename bitte anpassen.

Anzeige
;

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
Anzeige
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
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
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige