Diagramm formatieren über VBA

Hallo,

ich habe eine Tabelle mit Temperaturmeßwerten die werden durch ein Makro sortiert und ein Diagramm erstellt. Das Makro ist von Reinhard aus diesem Forum.

Ich möchte das Diagramm in der zeitachse dehnen, da wird über 7 Tage alle 10 min gemessen, dementsprechend zusammengepreßt sind die Meßwerte. wenn das auf die doppelte Länge geht wäre schon viel geholfen, dann muß ich eben hin und her scrollen.
Die Beschriftung der zeitachse hätte ich auch gerne aus dem Diagramm draußen, also unter der -10Grad Linie.

Vielleicht kann mir wer oder Reinhard helfen.

Gruß Hans

Ich habe die Mappe temperaturMessung hochgeladen.
http://www.hostarea.de/server-09/September-fa4b17620…

Vba Diagramm dehnen

Ich möchte das Diagramm in der zeitachse dehnen, da wird über
7 Tage alle 10 min gemessen, dementsprechend zusammengepreßt
sind die Meßwerte. wenn das auf die doppelte Länge geht wäre
schon viel geholfen, dann muß ich eben hin und her scrollen.
Die Beschriftung der zeitachse hätte ich auch gerne aus dem
Diagramm draußen, also unter der -10Grad Linie.
http://www.hostarea.de/server-09/September-fa4b17620…

Hallo Hans,

probier dieses mal:

http://www.hostarea.de/server-09/September-7d3e875c8…

Im ausgeblendeten Blatt „Tabelle3“ sind die Originaldaten deines ehemaligen Blattes „Rohdaten“ vor der Ausführung des Makros „Sortieren“

Gruß
Reinhard

Hallo Reinhard,

das ist das was ich brauche, eigentlich schon mehr als ich erwartet habe.
Vielen Dank.

Gruß Hans

das ist das was ich brauche, eigentlich schon mehr als ich
erwartet habe.

Hallo Hans,

so wie das klingt scheint ja der Code zu klappen, sehr schön.

Ja, im Code stecken schon viele Stunden Arbeit, normal ist das bezahlte Auftragsprogrammierung, aber gelegentlich mache ich das aus Spass an der Freud :smile:

Zur Abgeltung meiner Leistung, gib dem nächsten Bettler den du triffst einfach mal so 10 €, egal ob er damit wieder Bier kauft, Hauptsache er freut sich.

Zum Thema zurück, für das Diagramm, da fehlt noch daß die y-Wertebereiche immer gleich bleiben, okay, das krieg ich hin.

Aber da es für mich viel Aufwand bedeuten würde mich in diese Diagramme von Excel einzuarbeiten um herasuzufinden wie man denn da die x-Werte bzw. die Anzeige der x-Werte nach unten verschiebt, so warte ich ab bis hier jmd. sagt wie man das in Excel macht.
Danach kann ich dir das in den Code miteinbauen.

Gruß
Reinhard

Grüezi Reinhard

Zum Thema zurück, für das Diagramm, da fehlt noch daß die
y-Wertebereiche immer gleich bleiben, okay, das krieg ich hin.

Aber da es für mich viel Aufwand bedeuten würde mich in diese
Diagramme von Excel einzuarbeiten um herasuzufinden wie man
denn da die x-Werte bzw. die Anzeige der x-Werte nach unten
verschiebt, so warte ich ab bis hier jmd. sagt wie man das in
Excel macht.

Ihr habet gerufen, Meister…! :wink:

Danach kann ich dir das in den Code miteinbauen.

Passe das Ende des Codes wie folgt an, dann wird die Beschrftung der X-Achse immer auf dem Minimum der Y-Achse dargestellt:

 ActiveSheet.Name = "Diag" & .Name
 With ActiveChart.Axes(xlValue)
 .CrossesAt = .MinimumScale
 End With

An die ganzen Eigenschaften der Y-Achse kommst Du mit einem Doppelklick drauf - da ist es dann die letzte der Eigenschaften für die Achsen-Skalierung.


Mit freundlichen Grüssen
Thomas Ramel

-- 
- MVP für Microsoft-Excel -
[Win XP Pro SP-2 / xl2003 SP-3]

Hallo Reinhard,

so wie das klingt scheint ja der Code zu klappen, sehr schön.

Ja, im Code stecken schon viele Stunden Arbeit, normal ist das
bezahlte Auftragsprogrammierung, aber gelegentlich mache ich
das aus Spass an der Freud :smile:

das freut mich natürlich auch wenns dir Spass macht

Zur Abgeltung meiner Leistung, gib dem nächsten Bettler den du
triffst einfach mal so 10 €, egal ob er damit wieder Bier
kauft, Hauptsache er freut sich.

das ist eine gute Idee

Zum Thema zurück, für das Diagramm, da fehlt noch daß die
y-Wertebereiche immer gleich bleiben, okay, das krieg ich hin.

Aber da es für mich viel Aufwand bedeuten würde mich in diese
Diagramme von Excel einzuarbeiten um herasuzufinden wie man
denn da die x-Werte bzw. die Anzeige der x-Werte nach unten
verschiebt, so warte ich ab bis hier jmd. sagt wie man das in
Excel macht.
Danach kann ich dir das in den Code miteinbauen.

Grad habe ich einen Betrag von Thomas gelesen so wie mir scheint hat er eine Lösung dafür.

wenn du einmal Zeit und Lust Hast, ein paar Erklärungen zu deinem Code wären für mich sehr hilfreich, einmal einfach aus Interesse um dazuzulernen, aber auch um ev. einmal etwas anpassen zu können.

Gruß Hans

Hallo Thomas

Passe das Ende des Codes wie folgt an, dann wird die
Beschrftung der X-Achse immer auf dem Minimum der Y-Achse
dargestellt:

An die ganzen Eigenschaften der Y-Achse kommst Du mit einem
Doppelklick drauf - da ist es dann die letzte der
Eigenschaften für die Achsen-Skalierung.

Das werde ich gleich mal probieren, melde mich wieder.

Gruß Hans

Hallo Thomas,

ich habs getestet, es funktioniert. Ich danke dir.

Auch dir, Reinhard nochmals Danke.

Gruß Hans