OpenOffice.info

Function LETZTESBLATT()
LETZTESBLATT = thisComponent.GetSheets.ElementNames(thisComponent.GetSheets.count-1) 
end Function

Hallo allerseits

@Karolus
so wie ich @Spinnenmann verstehe möchte er eigentlich eine Kombination aus den beiden Vorschlägen von @mikeleb und @komma4,
@komma4
deine aktualisierung per Zufallszahl schein mir nicht unbedingt nötig, zumindest auf menem AOO 4.1.1 "tut es auch ohne"
@mikeleb
dein Vorschlage ist doch eher statisch

@ Spinnenmann
erstelle dir eine Funktion, die den Namen des letzten Tabellenblatt ermittelt und ausgibt z.B. so

[code]Function LETZTESBLATT()
LETZTESBLATT = thisComponent.GetSheets.ElementNames(thisComponent.GetSheets.count-1)
end Function
[/code]

und wende diese Funktion dann in einer INDIREKT() Formel an z.B. so

[color=#0000FF]= INDIREKT(LETZTESBLATT()&".D12")[/color]

das würde dann immer eine aktive Verknüpfung auf D12 des letzten Tabellenblatt ergeben.

Wozu brauchts da jetzt Makros oder hässliche INDIREKT-formeln ??

Du musst einmal ein Blatt anlegen mit den relativen Bezügen auf das vorhergehende Blatt, und das fertige Blatt dann weiterhin nur [b]kopieren und ans Ende stellen[/b]. ( dabei ist es völlig egal ob die Blätter `Tabelle1, Tabelle2,...` oder `Hinz, Kunz, August,...` heissen )

Function NameOfLastSheets()
   oSheets = ThisComponent.getSheets()
   numSheets = oSheets.getCount()
   NameOfLastSheets = oSheets.getElementNames()(numSheets-1)
End Function

=NameOfLastSheets()&T(ZUFALLSZAHL())

[quote="mikeleb"]in einer Zelle (sagen wir mal A5) der ersten Tabelle den Namen der letzten Tabelle einzugeben[/quote]
Da automatisieren wir aber noch ein wenig...

Folgendes Vorgehen ist erforderlich, um den Namen der letzten Tabelle in die Zelle [b]A5[/b] zu bekommen:

a)
kopieren der folgenden BASIC-Funktion in ein Modul der [color=#0040FF]STANDARD[/color]-Bibliothek (des Dokuments, oder der Installation)
[code]Function NameOfLastSheets()
oSheets = ThisComponent.getSheets()
numSheets = oSheets.getCount()
NameOfLastSheets = oSheets.getElementNames()(numSheets-1)
End Function[/code]
b)
Eingabe der Formel in [b]A5[/b]
[code]=NameOfLastSheets()&T(ZUFALLSZAHL())[/code]

In [b]A5[/b] steht nun der Name des letzten Tabellenblattes (automatisch aktualisiert, wenn neue eingefügt wurden)


Na - macht CALC nicht Spass? ! !

=Tabelle10.B4

=indirekt(A5 & ".B4")

=indirekt(adresse(4;2;;;A5)

Hallo,

eine Variante wäre in einer Zelle (sagen wir mal A5) der ersten Tabelle den Namen der letzten Tabelle einzugeben und dann aus z. B.
[code]=Tabelle10.B4[/code]
sowas zu machen:
[code]=indirekt(A5 & ".B4")[/code]
oder
[code]=indirekt(adresse(4;2;;;A5)[/code]

Hi,

ich habe ein Dokument, das aus mehreren Tabellen besteht, die monatlich weiterkopiert werden. Der Bezug von Feldern der ersten Tabelle, die eine Übersicht darstellt, soll immer die Daten aus Feldern der letzten Tabelle übernehmen, die sich vom Namen her aber ändert. Ist das irgendwie realisierbar?

Danke für Eure Vorschläge.