Tabellenblätter - Namen | HERBERS Excel Forum

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Stefan,
keine schöne Lösung (die Formeln werden leicht verhunzt), aber so könnte es gehen:

Testerg. (2005)

	A
1	4711
2	1
3	2
4	3

Testerg. (2006)

	A	B	C
1	Testerg. (2005)	4711	4717
2
3	Testerg. (2006)	Testerg. (2005)

Formeln der Tabelle

A1 : =LINKS(RECHTS(ZELLE("Dateiname");LÄNGE(ZELLE("Dateiname"))-FINDEN("]"; ZELLE("Dateiname");1));10) &(TEIL(RECHTS(ZELLE("Dateiname");LÄNGE(ZELLE("Dateiname"))-FINDEN("]"; ZELLE("Dateiname");1));11;4)-1) &")"
B1 : =INDIREKT("'"&A1&"'!a1")
C1 : =SUMME(INDIREKT("'"&A1&"'!a1:a5"))
B3 : =LINKS(A3;10)&(TEIL(A3;11;4)-1)&")"

Diagramm - Grafik - Excel Tabellen einfach im Web darstellen Excel Jeanie HTML 3.0 Download
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Hallo Stefan,
die folgende Möglichkeit macht zwar bei der Einführung etwas Arbeit, spart aber auf Dauer einigen Aufwand. In jeder Formel mit einem (jetzt noch festen) Bezug auf das Vorblatt musst du den Bezug mittels einer Funktion "vbl()" herstellen.
Umstellungsbeispiel:
Wenn abc das Blatt vor dem aktiven Blatt ist, musst du anstelle von
=abc!$B7:C9
nun schreiben:
=vbl($B7:C9)
Beispiele, bei denen sich nur die Blattfolge geändert hat:
(Die Formeln stehen im Blatt "noch eins".)

	A	B	C
1	Blattfolge	Werte	Beispielformeln
2	1
3	abc	in xyz	=vbl($A$1)
4	xyz	in abc	=vbl(abc!$A$1)
5	noch eins	in abc	=vbl(xyz!$A$1)
6		in xyz und in abc	=vbl($A$1)&" und "&vbl(xyz!$A$1)
7
8	2
9	xyz	in abc	Die Formeln bleiben unverändert.
10	abc	in xyz	Werte ändern sich bei Änderung der Blattfolge.
11	noch eins	in xyz
12		in abc und in xyz
13
14	3
15	xyz	in abc
16	Tabelle4	in Tabelle4
17	abc	in xyz
18	noch eins	in abc und in xyz

Formeln der Tabelle

B3 : =vbl($A$1)
B4 : =vbl(abc!$A$1)
B5 : =vbl(xyz!$A$1)
B6 : =vbl($A$1)&" und "&vbl(xyz!$A$1)

Diagramm - Grafik - Excel Tabellen einfach im Web darstellen Excel Jeanie HTML 3.0 Download
Und das ist die Funktion (Quelle: https://www.herber.de/forum/archiv/600to604/t602995.htm#603025 ): Option Explicit Function vbl(rg As Range) As Range Application.Volatile If rg.Parent.Index > 1 Then Set vbl = Sheets(rg.Parent.Index - 1).Range(rg.Address) Else Set vbl = rg ' Das erste Blatt verweist auf sich selbst! End If End Function ' Original von IngoG am 24.04.2005 14:19:09 Function vorblatt(zelle As Range) As Range ' wird in dieser Mappe nicht genutzt Application.Volatile If zelle.Parent.Index > 1 Then Set vorblatt = Sheets(zelle.Parent.Index - 1).Range(zelle.Address) Else Set vorblatt = zelle 'für minimum erstes Blatt!!! ' set vorblatt=Sheets(sheets.count).Range(zelle.Address) 'für rollierende zuweisung!!! End If End Function
Macht wie gesagt etwas Arbeit, sollte aber dein Problem lösen.
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Beliebteste Forumthreads (12 Monate)

Tabellenblätter - Namen

13 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

13
Beiträge zum Forumthread

Beiträge zu diesem Forumthread