Diagrammtitel aus Zelle auslesen
Steffen Thieringer
wie kann ich in einem Diagramm dessen Titel aus einer Zelle auslesen und in
das Diagramm einfügen?
Oder ist es nur möglich nur Text in den Diagrammoptionen einzugeben ?
Danke für Eure Tipps.
Gruss Steffen
Robert Aletter
Hi Steffen
Nachfolgend die Codezeile, wie du an die Eigenschaft des
Chartobjektes kommst
Du musst nur die Namen ersetzen
Viele Grüße
Robert
------------------------------------------------------
ActiveSheet.ChartObjects("Name").Chart.ChartTitle.Text =
Range("Name").value
oder
ActiveSheet.ChartObjects(index).Chart.ChartTitle.Text =
Range("Name").value
und für index den nummerischen Wert des Chartobjektes in
der ChartObjects-Liste
>-----Originalnachricht-----
>.
>
Frank Arendt-Theilen
füge in das Diagramm einen beliebigen Diagrammtitel ein.
Markiere den Diagrammtitel und klicke in die Bearbeitungszeile. Trage
ein Gleichheitszeichen ein und markiere die Zelle, aus der der Titel
in das Diagramm übernommen werden soll.
MfG Frank
_____________________________________________________
Frank Arendt-Theilen, Microsoft MVP für Excel, Hameln
E-Mail: Thei...@t-online.de
Am Wed, 15 Aug 2001 13:04:38 +0200, schrieb "Steffen Thieringer"
<steffen.t...@nmb.co.uk> in microsoft.public.de.excel zu
"Diagrammtitel aus Zelle auslesen":
Thomas Siewert
vielen, vielen Dank.
Hatte gerade genau dieses Problem.
Manchmal ist das naheliegendste sooo weit entfernt :-))
MfG, Tom
"Frank Arendt-Theilen" <Thei...@t-online.de> schrieb im Newsbeitrag
news:36vkntkhpn7d2vpmh...@4ax.com...
Thomas Siewert
mit einer einzelnen Zelle klappt das ja ganz wunderbar:
With ActiveChart
.HasTitle = True
.ChartTitle.Text = "=Bericht!R2C1"
End With
mit einem zusammenhängenden Bereich auch:
.ChartTitle.Text = "=Bericht!R36C1:R38C1"
nur mit einem nicht zusammenhängenden Bereich kriege ich es nicht hin:
"=Bericht!R36C1 + Bericht!R42C25"
Geht sowas überhaupt?
Und kriegt man dann auch noch Zeilenumbrüche dareingemogelt?
Und klappt das auch dann noch mit dem Zellbezügen?
Für Hilfe wäre ich da sehr dankbar.
MfG, Tom.
"Frank Arendt-Theilen" <Thei...@t-online.de> schrieb im Newsbeitrag
news:36vkntkhpn7d2vpmh...@4ax.com...
Thomas Ramel
Thomas Siewert schrieb:
>
> Nochmal Hallo Frank,
>
> mit einer einzelnen Zelle klappt das ja ganz wunderbar:
>
> With ActiveChart
> .HasTitle = True
> .ChartTitle.Text = "=Bericht!R2C1"
> End With
>
> mit einem zusammenhängenden Bereich auch:
>
> .ChartTitle.Text = "=Bericht!R36C1:R38C1"
>
> nur mit einem nicht zusammenhängenden Bereich kriege ich es nicht hin:
>
> "=Bericht!R36C1 + Bericht!R42C25"
Versuchs mit "=Bericht!R36C1" & "Bericht!R42C25"
> Und kriegt man dann auch noch Zeilenumbrüche dareingemogelt?
Chr(...) sollte den Umbruch liefern. Ich weiss im Moment nicht welche
Zeichen benötigt werden.
--
Mit freundlichen Grüssen
Thomas Ramel
Schlesinger Konstruktionen
http://www.4853.ch/Schlesinger
Thomas Siewert
> > "=Bericht!R36C1 + Bericht!R42C25"
>
> Versuchs mit "=Bericht!R36C1" & "Bericht!R42C25"
ergibt
"=Bericht!R36C1Bericht!R42C25"
und somit einen Fehler "Fehler in Formel............."
Trotzdem Danke.
MfG, Tom
Thomas Ramel
Thomas Siewert schrieb:
>
> > Versuchs mit "=Bericht!R36C1" & "Bericht!R42C25"
>
> ergibt
>
> "=Bericht!R36C1Bericht!R42C25"
>
> und somit einen Fehler "Fehler in Formel............."
Wenn die Zuordnung "händisch" geschieht und mehrere Zellen als Quelle
angegeben werden wir die Meldung ausgegeben, dass der Bezug für Rubriken
und Werte nur eua einer zelle,zeile oder Spalte bestehen darf. :-(
Als Workaround:
Die Zellen in einer dritten zusammenfassen z.B mit:
=C1&ZEICHEN(13)&C2
und den Bezug des Diagrammtitels darauf richten.
Führt bei mir zu zweizeiligem, umgebrochenen Titel.
Vielleicht hilft es Dir.
Thomas Siewert
werde es wohl so machen müssen.
MfG, Tom.