Tabellenblatt auswählen

Forumthread: Tabellenblatt auswählen

09.06.2009 09:40:23

Bege

Ich möchte ein bestimmtes Tabellenblatt auswählen. Der Name( ein Datum) ist in einer bestimmten Zelle enthalten und er ist durch ein Formularsteuerelement veränderlich. If/Then scheidet aus da immer neue Namen hinzukommen.

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Tabellenblatt auswählen

09.06.2009 09:44:11

Hajo_Zi
AW: Tabellenblatt auswählen

10.06.2009 08:50:21

Bege
AW: Tabellenblatt auswählen

10.06.2009 08:56:32

Hajo_Zi

AW: Tabellenblatt auswählen

09.06.2009 09:44:11

Hajo_Zi

mache ein Hyperlink in die Zelle

AW: Tabellenblatt auswählen

10.06.2009 08:50:21

Bege

Dann müßte ich ja jedes neue Tabellenblatt explizit mit einem Hyperlink versehen. Das Problem ist: Ich erstelle über einen Button eine neues Tabellenblatt welches nach dem aktuellen Datum benannt wird. Nach einiger Zeit habe ich nun eine ganze Reihe von Tabellenblättern und es kommen immer neue hinzu. Ich wollte nun über ein Listenfeld ( welches immer automatisch aktualisiert wenn neue Tabellenblätter hinzu kommen ) in dem alle Blattnamen stehen auf das gewünschte Tabellebblatt zugreifen. Wie schaffe ich es das, wenn in zB. Zelle A10 das Datum "1.Mai 2009" steht ich auch zum Tabellenblatt "1.Mai 2009" springe? Wie schon gesagt : If/Then scheidet aus da immer neue Namen hinzukommen.

AW: Tabellenblatt auswählen

10.06.2009 08:56:32

Hajo_Zi

Hallo Nick,
vorhandene Tabellen

	A	B	C	D
1	Datum	Veranstaltung
2	Übersicht!a1
3	vorhandene Tabellen!a1
4	12.10.2003!a1
5	17.04.2003!a1
6
7		Hi Holger,
8
9		hatte diese Frage auch grad in einem anderen Forum (anderer Fragesteller) so beantwortet:
10
11		Einfügen -> Namen -> Definieren/Festlegen, Name: x
12		bezieht sich auf:
13		=ARBEITSMAPPE.ZUORDNEN(1+0*JETZT())
14
15		In irgendeine Zelle jetzt diese Formel und runterkopieren:
16		=WENN(ZEILEN($1:1)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:1));FINDEN("]";INDEX(x;ZEILEN($1:1)))+1;31))
17
18		Grüße Boris
19
20
21		Formel runter ziehen falls Mehr Tabellen

verbundene Zellen

B1:D1

verwendete Formeln
Zelle	Formel
A2	=HYPERLINK("#" & WENN(ZEILEN($1:1)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:1));FINDEN("]";INDEX(x;ZEILEN($1:1)))+1;31)) & "!A1";WENN(ZEILEN($1:1)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:1));FINDEN("]";INDEX(x;ZEILEN($1:1)))+1;31))&"!a1" )
A3	=HYPERLINK("#" & WENN(ZEILEN($1:2)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:2));FINDEN("]";INDEX(x;ZEILEN($1:2)))+1;31)) & "!A1";WENN(ZEILEN($1:2)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:2));FINDEN("]";INDEX(x;ZEILEN($1:2)))+1;31))&"!a1" )
A4	=HYPERLINK("#" & WENN(ZEILEN($1:3)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:3));FINDEN("]";INDEX(x;ZEILEN($1:3)))+1;31)) & "!A1";WENN(ZEILEN($1:3)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:3));FINDEN("]";INDEX(x;ZEILEN($1:3)))+1;31))&"!a1" )
B4	=WENN(ISTFEHLER(INDIREKT(A4&"!B4:D4"));"";INDIREKT(A4&"!B4:D4"))
A5	=HYPERLINK("#" & WENN(ZEILEN($1:4)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:4));FINDEN("]";INDEX(x;ZEILEN($1:4)))+1;31)) & "!A1";WENN(ZEILEN($1:4)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:4));FINDEN("]";INDEX(x;ZEILEN($1:4)))+1;31))&"!a1" )
B5	=WENN(ISTFEHLER(INDIREKT(A5&"!B4:D4"));"";INDIREKT(A5&"!B4:D4"))
A6	=HYPERLINK("#" & WENN(ZEILEN($1:5)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:5));FINDEN("]";INDEX(x;ZEILEN($1:5)))+1;31)) & "A1";WENN(ZEILEN($1:5)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:5));FINDEN("]";INDEX(x;ZEILEN($1:5)))+1;31)) )
B6	=WENN(ISTFEHLER(INDIREKT(A6&"!B4:D4"));"";INDIREKT(A6&"!B4:D4"))
C6	=WENN(ISTFEHLER(INDIREKT(A6&"!E4"));"";INDIREKT(A6&"!E4"))
D6	=WENN(ISTFEHLER(INDIREKT(A6&"!F4"));"";INDIREKT(A6&"!F4"))
D7	=WENN(ISTFEHLER(INDIREKT(A7&"!F4"));"";INDIREKT(A7&"!F4"))
D8	=WENN(ISTFEHLER(INDIREKT(A8&"!F4"));"";INDIREKT(A8&"!F4"))
D9	=WENN(ISTFEHLER(INDIREKT(A9&"!F4"));"";INDIREKT(A9&"!F4"))
D10	=WENN(ISTFEHLER(INDIREKT(A10&"!F4"));"";INDIREKT(A10&"!F4"))
D11	=WENN(ISTFEHLER(INDIREKT(A11&"!F4"));"";INDIREKT(A11&"!F4"))
D12	=WENN(ISTFEHLER(INDIREKT(A12&"!F4"));"";INDIREKT(A12&"!F4"))
D13	=WENN(ISTFEHLER(INDIREKT(A13&"!F4"));"";INDIREKT(A13&"!F4"))
D14	=WENN(ISTFEHLER(INDIREKT(A14&"!F4"));"";INDIREKT(A14&"!F4"))
D15	=WENN(ISTFEHLER(INDIREKT(A15&"!F4"));"";INDIREKT(A15&"!F4"))
D16	=WENN(ISTFEHLER(INDIREKT(A16&"!F4"));"";INDIREKT(A16&"!F4"))
D17	=WENN(ISTFEHLER(INDIREKT(A17&"!F4"));"";INDIREKT(A17&"!F4"))
D18	=WENN(ISTFEHLER(INDIREKT(A18&"!F4"));"";INDIREKT(A18&"!F4"))
A19	=WENN(ZEILEN($1:18)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:18));FINDEN("]";INDEX(x;ZEILEN($1:18)))+1;31))
B19	=WENN(ISTFEHLER(INDIREKT(A19&"!B4:D4"));"";INDIREKT(A19&"!B4:D4"))
C19	=WENN(ISTFEHLER(INDIREKT(A19&"!E4"));"";INDIREKT(A19&"!E4"))
D19	=WENN(ISTFEHLER(INDIREKT(A19&"!F4"));"";INDIREKT(A19&"!F4"))
A20	=WENN(ZEILEN($1:19)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:19));FINDEN("]";INDEX(x;ZEILEN($1:19)))+1;31))
B20	=WENN(ISTFEHLER(INDIREKT(A20&"!B4:D4"));"";INDIREKT(A20&"!B4:D4"))
C20	=WENN(ISTFEHLER(INDIREKT(A20&"!E4"));"";INDIREKT(A20&"!E4"))
D20	=WENN(ISTFEHLER(INDIREKT(A20&"!F4"));"";INDIREKT(A20&"!F4"))
A21	=WENN(ZEILEN($1:20)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:20));FINDEN("]";INDEX(x;ZEILEN($1:20)))+1;31))
C21	=WENN(ISTFEHLER(INDIREKT(A21&"!E4"));"";INDIREKT(A21&"!E4"))
D21	=WENN(ISTFEHLER(INDIREKT(A21&"!F4"));"";INDIREKT(A21&"!F4"))

definierte Namen
Name	Bezieht sich auf
x	=ARBEITSMAPPE.ZUORDNEN(1+0*JETZT())

Tabellendarstellung in Foren Version 1.6

Gruß Hajo

Beliebteste Forumthreads (12 Monate)

Forumthread: Tabellenblatt auswählen

3 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread