Diagrammtitel mit Zellbezug

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Diagrammtitel mit Zellbezug

Re: Diagrammtitel mit Zellbezug

von F3K Total » Mo, 31.03.2014 19:46

Hallo zusammen,
der Code von Karolus funzt auch in AOO, daher kann man die function so umbenennen:

Code: Alles auswählen

function diagramtitle( title, sheetnumber, sname)
Gruß R

Re: Diagrammtitel mit Zellbezug

von zero82 » Mo, 31.03.2014 12:17

Danke für die Antworten. Ich habe mittlerweile verstanden, wie ich die Formel benutzen muss. Thanks @ all

Re: Diagrammtitel mit Zellbezug

von Karolus » Mo, 31.03.2014 11:55

Hallo

In LO gibts auf einem chart-object kein .DisplayName property mehr.
Anolog zu Riks-Code ist:

Code: Alles auswählen

function diagramtitle_libre( title, sheetnumber, sname)
	with thisComponent.Sheets.getByIndex( sheetnumber-1).Drawpage
	for i = 0 to .count() -1
		if .getByIndex(i).Name = sname then
			.getByIndex(i).Model.Title.String = title
			diagramtitle_libre = title
			exit function
		end if
	next i
	end with
end function

Re: Diagrammtitel mit Zellbezug

von zero82 » Mo, 31.03.2014 09:41

hi,

danke für die Antworten. Zu deinem letzten Beispiel. Wo kann ich den Zellbezug einstellen? Im Code finde ich leider keinen Bezug auf eine Zelle. Könntest du mir vielleicht kurz erklären, was ich machen, muss um dieses Beispiel auf meine Datei anzuwenden habe. Ich habe etwa 8 Diagramme deren Namen ich auf eine Zelle zu beziehen habe. Die Namen befinden sich in einer Spalte. Von A4:A11.

Übrigens danke für die Antworten. :-)

Gruß
z

Re: Diagrammtitel mit Zellbezug

von F3K Total » So, 30.03.2014 09:41

Hi,
hier noch eine veränderte, verbesserte Version. Der function werden alle notwendigen Argumente (Überschrift, Tabellenblatt, Diagrammname) mitgegeben, so dass beliebig viele Diagramme, auch auf mehreren Tabellenblättern, mit Überschriften versehen werden können.
Die Diagramme müssen eindeutig benamst werden (kein Name doppelt).
Zur besseren Übersicht, gibt die Function jetzt den Diagrammnamen zurück.

Code: Alles auswählen

function set_Title(sTitle,nSpreadsheet,sDiagram)
    oCharts = thiscomponent.sheets.getbyindex(nSpreadsheet-1).Charts
    oChartsenumeration = oCharts.createenumeration
    While oChartsenumeration.hasmoreelements
        ochart = oChartsenumeration.nextelement
        if ochart.DisplayName = sDiagram then ochart.EmbeddedObject.Title.String = sTitle
    Wend
    set_title = sDiagram
End function
Gruß R
Dateianhänge
Diagramm_Autotitle.ods
(28.51 KiB) 189-mal heruntergeladen

Re: Diagrammtitel mit Zellbezug

von F3K Total » Sa, 29.03.2014 08:25

lorbass hat geschrieben:Lies in der Programmhilfe, ob sich in deiner OpenOffice-Verskion daran was geändert hat.
Ich konnte nichts finden.
Hier eine kurze function incl. Beispieldatei, die den Job erledigt:

Code: Alles auswählen

function set_Title(CELL)
    oCharts = thiscomponent.sheets.getbyname("Tabelle1").Charts
    oChartsenumeration = oCharts.createenumeration
    While oChartsenumeration.hasmoreelements
        ochart = oChartsenumeration.nextelement
        if ochart.DisplayName = "MeinDiagrammF3K" then ochart.EmbeddedObject.Title.String = CELL
    Wend
    set_title = "aktuell: "&CELL
End function
Gib dem Diagramm einen Namen (rechte Maustaste, Namen ...) und setzte den Namen statt "MeinDiagrammF3K" in die Function ein. Das tabellenblatt muss natürlich auch stimmen (hier "Tabelle1")
Der Diagrammtitel muss im Beispiel in Zelle C1 eingetragen werden, ob per Formel oder von Hand. Die function steht in C2.
HTH
R
Dateianhänge
Diagramm_Autotitle.ods
(17.78 KiB) 156-mal heruntergeladen

Re: Diagrammtitel mit Zellbezug

von lorbass » Fr, 28.03.2014 19:19

F1 → Programmhilfe ([color=#AA0000]LibreOffice 3.5.4.2[/color]) hat geschrieben:Titel
Wenn Sie Text für einen Titel, Untertitel oder eine Achse eingeben, bleibt neben dem Diagramm ausreichend Platz für die Textanzeige frei. Wenn Sie keinen Text eingeben, ist dies nicht der Fall, so dass mehr Platz für die Anzeige des Diagramms zur Verfügung steht.
Der Titeltext kann nicht mit einer Zelle verknüpft werden. Sie müssen den Text direkt eingeben.
Lies in der Programmhilfe, ob sich in deiner OpenOffice-Verskion daran was geändert hat.

Gruß
lorbass

Diagrammtitel mit Zellbezug

von zero82 » Fr, 28.03.2014 16:21

Hallo,

ich suche vergebens eine Möglichkeit einen Diagrammtitel eine Zelle zuzuordnen. Sobald sich der Name der Zelle ändert soll sich der Titel ebenfalls ändern. Ist dies in Cac möglich? Wenn ja wo kann man dies einstellen?

Danke schonmal.

Gruß
z

Nach oben