Office: (Office 2007) Diagramm das mit VBA Makro erstellt wurde Skalierung aus Spalte übernehmen

Hallo an alle User,

habe mich erstmals mit einem VBA Makro versucht das ein Diagramm erstellen soll, dieses wird auch getan mein Problem ist, das die X-Achse durchnummeriert wird. Ich brauche Hilfestellung meine Skalierung der Achse steht in einer Spalte wie kann ich die Nummerierung austauschen gegen die Spaltenwerte.
Bitte um Hilfe!!!
Code:

:)

 

Hi,

und wo stehen deine eigentlichen Werte? Mit deinem Code weist du dem Diagramm nur Werte zu und keine Rubriken. Da in den Zellen D19: D200 offensichtlich Text steht, werden die Werte von Excel zu 0 angenommen (da Text nicht als Zahl interpretiert werden kann) und als Achsenbeschriftung die standardmäßige Beschriftung, die eine fortlaufende Nummerierung darstellt.

 

Hallo Beverly,

in der Spalte D befinden sich generierte Daten bestehend aus 1 & 0 (Ein / Aus)
und in Spalte A befinden sich generierte Zeiten z.B. 00:10 Uhr

Die Ein/Aus Daten sollen zur Zeit zu geordnet werden!!!

Danke für deine schnelle Reaktion

Gruß MSO2007-Frischling

 

Hi,
Code:

Mir ist nur nicht klar, weshalb du ein gestapeltes Säulendiagramm verwendest, wenn nur 1 Datenreihe vorhanden ist.

 

Danke für deine Schnelle Hilfe!

welche Diagrammform sollte ich den am besten Wählen habe es aus probiert den Code ( so kann ich wirklich nicht odentlich sehen was in den weiteren Spalten enthalten ist) aber bis dato super Hilfe

Ich werd mal das xlColumnStacked austauschen

Dankeschön

 

Danke für deinen überarbeitetn Code habe es noch gefunden was die Anzeige erschwert hat
war
.CategoryType = xlTimeScale

Super Danke schön nochmals

 

Hallo Beverly,

kann ich auch die Auswahl bei Range

(Range("'B90'!$A$19:$A$200"), Range("'B90'!$D$19:$D$200"))
auf ein weiteres Tabellenblatt erweitern dieses auch bzw. optimieren
z.B. aus 'B90' 'B70' oder 'B93'

 

Hi,

wenn die X-Werte die selben sind, kann man auch zusätzlich Datenreihen hinzufügen und ihre Werte aus anderen Tabellenblättern entnehmen. Der Code würde dann so aussehen:
Code:

 

Hallo Beverly,

Das Koordinatensystem bleibt erhalten auch die Datenreihenstruktur,
es müsste nur die Datenreihen geändert werden und die jeweilige Beschriftung vom Diagrammtitel vieleicht auch die Position vom zweiten bzw. nächstem Diagramm ändern damit man auch den Überblick behält.

Gruß
MSO2007-Frischling

 

Hi,

sorry, jetzt verstehe ich erst mal überhaupt nichts mehr. Ich hatte das so verstanden, dass du ein Diagramm mit mehreren Datenreihen erstellen willst, deren Daten allerdings aus unterschiedlichen Tabellenblättern stammen. Da ich das offensichtlich falsch verstanden habe, musst du schon mal genau beschreiben, was du erreichen willst.

 

Hallo Beverly,

der erste Step hat ja super funktioniert, der zweite Step wäre so

im Tabellenblatt1 werden die Parameter eingegeben für die jeweiligen folgenden Tabellenblätter mit Namen B90 B70 B93 usw.

in den Tabellenblättern B90 B70 usw.
ist die Struktur identisch nur die Parameter aus Tabellenblatt1 ändern die Spalten A & D durch Parametrierung

Es soll die Datenreihen aus den einzelnen Untertabellenblättern in jeweils ein eigenes Diagramm gestellt werden, und jeweilige Name vom Diagramm steht im Tabellenblattnamen (B90 B70 usw.) dieser sollte als Diagrammbeschriftung genommen werden.

und die Position für jedes Diagramm ändern

es würde ja auch mit deiner ersten Version klappen müsste nur mehere Button einfügen und Makro dublizieren und anpassen
Step2 wäre das Sahnehäupchen!!!
da nur ein Button nötig

 

Hi,
Code:

 

Danke Beverly,

werd morgen dein Skript Ausprobieren,

Melde mich morgen nochmals dazu..*Smilie
Dankeschön bis Morgen!!!

 

Hallo Beverly,

habe dein Skript ausprobiert es läuft problemlos durch aber es werden keine Diagramme erzeugt!!!

habe das Makro in einzelschritten durchlaufen lassen der einsprung funktioniert aber es scheint das das wksTab (Worksheets), den Name des Tabellenblattes nicht an Range weitergibt.

kann mann die Balkenbreite vom Diagramm anpassen?

Gruß

MSO2007-Frischling

 

Hi,

wieso werden keine Diagramme erzeugt? Lösche in den Tabellenblättern B90 und B70 alle dort vorhandenen Diagramme und führe dann den Code aus - es wird in jedem der beiden Tabellenblätter je 1 Diagramm erzeugt an der von dir vorgegebenen Position.

Die Breite der Säulen (nicht Balken!) lässt sich nach einem Rechtsklick auf die Datenreihe -> Datenreihen formatieren -> Abstandsbreite manipulieren.