Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon pp2015 vom 04.07.2019, 16:11 Options
Ecxel: Dynamischer Datenbereich Diagramm
Hallo!
ich habe ein Diagramm das einen Trend über einen Zeitablauf abbildet. Die Werte sind Kalenderwochen zugeordnet.
Jetzt möchte ich dass sich die Datenquelle des Diagramms von selbst auf die aktuelle Kalenderwoche erweitert, wenn ich dort Daten eintrage, ohne dass ich jedesmal die Werte neu markieren und als Datenquelle eintragen muss.
Geht das? Kann mir jemand weiterhelfen?
Danke!
ich habe ein Diagramm das einen Trend über einen Zeitablauf abbildet. Die Werte sind Kalenderwochen zugeordnet.
Jetzt möchte ich dass sich die Datenquelle des Diagramms von selbst auf die aktuelle Kalenderwoche erweitert, wenn ich dort Daten eintrage, ohne dass ich jedesmal die Werte neu markieren und als Datenquelle eintragen muss.
Geht das? Kann mir jemand weiterhelfen?
Danke!
Antwort 1 von Handybike vom 09.07.2019, 14:07 Options
Hallo pp2015
ja das geht. Mir fallen da zwei Möglichkeiten ein.
Am leichtesten geht es wenn du einfach die kompletten 52 Jahreswochen (oder auch mehr wenn es über mehrer Jahre gehen soll) anlegst und dann dem Diagramm alle Spalten/Zeilen als Quelldaten angibst. So und dann blendest du einfach die Spalten aus die noch keine Daten enthalten.
Der zweite Weg geht über Makros. Hierzu musst du durch For Schleifen die Diagrammrange ermittel und dann mittels folgenden Code auf das Diagram zurgreifen
ActiveSheet.ChartObjects("Chart 4").Activate
ActiveChart.SetSourceData Source:=Sheets("Tabelle1").Range(Diagrammrange), PlotBy:=xlColumns
Chart 4 = da muss der Diagrammname rein, bekommst du raus indem du einfach ein Makro aufzeichnest und dann einfach mal das Diagramm markierst und dann sollte das Makro die Zeile ActiceSheet.ChartObjects("NAME").Activate enthalten
Tabelle1 = Name des Tabellenblattes wo sich das Diagramm befindet
Diagrammrange = die Range die im Diagramm angezeigt werden soll. Muss ein String sein in der Art "B2:H12"
So dann versuch mal dein Glück! Wenn noch Fragen sind einfach melden.
Gruß Thomas
ja das geht. Mir fallen da zwei Möglichkeiten ein.
Am leichtesten geht es wenn du einfach die kompletten 52 Jahreswochen (oder auch mehr wenn es über mehrer Jahre gehen soll) anlegst und dann dem Diagramm alle Spalten/Zeilen als Quelldaten angibst. So und dann blendest du einfach die Spalten aus die noch keine Daten enthalten.
Der zweite Weg geht über Makros. Hierzu musst du durch For Schleifen die Diagrammrange ermittel und dann mittels folgenden Code auf das Diagram zurgreifen
ActiveSheet.ChartObjects("Chart 4").Activate
ActiveChart.SetSourceData Source:=Sheets("Tabelle1").Range(Diagrammrange), PlotBy:=xlColumns
Chart 4 = da muss der Diagrammname rein, bekommst du raus indem du einfach ein Makro aufzeichnest und dann einfach mal das Diagramm markierst und dann sollte das Makro die Zeile ActiceSheet.ChartObjects("NAME").Activate enthalten
Tabelle1 = Name des Tabellenblattes wo sich das Diagramm befindet
Diagrammrange = die Range die im Diagramm angezeigt werden soll. Muss ein String sein in der Art "B2:H12"
So dann versuch mal dein Glück! Wenn noch Fragen sind einfach melden.
Gruß Thomas
Ähnliche Themen
Pivot Datenbereich
ghoul-xtc 23.03.2007 - 214 Hits -
Treppen Diagramm
yuan 07.12.2007 - 142 Hits - 2 Antworten
eingebettetes diagramm bearbeiten per VBA
seebaer_1 18.12.2007 - 116 Hits - 2 Antworten
Problem mit Diagramm-Darstellung
Knubbel 30.01.2008 - 54 Hits - 6 Antworten
Kontrast oder Dynamischer Kontrast?
BuBert 16.06.2008 - 106 Hits - 1 Antwort
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
