verzeichnis tabellen erstellen

Bild

Betrifft: verzeichnis tabellen erstellen
von: Michael
Geschrieben am: 07.10.2003 15:11:30

kann ich für eine arbeitsmappe eine art inhaltsverzeichnis aller tabellen mit namen automatisch erstellen?

danke und gruß

Bild


Betrifft: AW: verzeichnis tabellen erstellen
von: Panicman
Geschrieben am: 07.10.2003 15:24:35

Hallo Michael,

in Modul kopieren:

Sub Register()
Dim x As Integer
    x = 1
Dim I As Integer
For I = 1 To Worksheets.Count
Cells(x, 1) = Worksheets(I).Name
x = x + 1
Next
End Sub



Gruß
Holger


Bild


Betrifft: AW: verzeichnis tabellen erstellen
von: Michael
Geschrieben am: 07.10.2003 16:12:56

hallo

vielen dank hat geklappt

grüße


Bild


Betrifft: Alle Tabellenblätter auflisten - ohne VBA
von: Boris
Geschrieben am: 07.10.2003 17:14:15

Hi Holger,

hatte diese Frage auch grad in einem anderen Forum (anderer Fragesteller) so beantwortet:

Einfügen -> Namen -> Definieren/Festlegen, Name: x
bezieht sich auf:
=ARBEITSMAPPE.ZUORDNEN(1+0*JETZT())

In irgendeine Zelle jetzt diese Formel und runterkopieren:
=WENN(ZEILEN($1:1)>VERGLEICH("";x;-1);"";TEIL(INDEX(x;ZEILEN($1:1));FINDEN("]";INDEX(x;ZEILEN($1:1)))+1;31))

Grüße Boris


Bild


Betrifft: @ Boris *wau* ich glaub es mal wieder nicht ...
von: Panicman
Geschrieben am: 07.10.2003 17:52:44

Hi Boris,

GENIAL (und das ohne ARRAY)

Gruß
Holger


 Bild

Beiträge aus den Excel-Beispielen zum Thema " verzeichnis tabellen erstellen"