Register auslesen

Forumthread: Register auslesen
5 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Register auslesen

25.08.2005 15:07:25

Overmind

Hallo.
Wie kann ich sämtliche Registerblätterbezeichnungen auslesen lassen und diese in eine Tabelle schreiben lassen, da ich eine Art Inhaltsverzeichnis mit Namen haben möchte.
Ovi

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Register auslesen

25.08.2005 15:15:00

Uduuh
Korrektur

25.08.2005 15:16:45

Uduuh
AW: Korrektur

25.08.2005 16:32:29

Overmind
AW: Korrektur

25.08.2005 17:45:12

u_
oder für den Profi...

25.08.2005 17:52:54

u_

AW: Register auslesen

25.08.2005 15:15:00

Uduuh

Hallo,
1000x gefragt.


Sub Inhalt()
Dim sh As Worksheet
For Each sh In Worksheets
Sheets(1).Cells(65536, 1).Offset(1, 0) = sh.Name
Next sh
End Sub

Gruß ausm Pott
Udo

Korrektur

25.08.2005 15:16:45

Uduuh

Hallo,
sorry.


Sub Inhalt()
Dim sh As Worksheet
For Each sh In Worksheets
Sheets(1).Cells(65536, 1).End(xlUp).Offset(1, 0) = sh.Name
Next sh
End Sub

Gruß ausm Pott
Udo

AW: Korrektur

25.08.2005 16:32:29

Overmind

Und wie wende ich das an?

AW: Korrektur

25.08.2005 17:45:12

Hallo,
in ein Modul kopieren und starten.
Gruß
Geist ist geil!

oder für den Profi...

25.08.2005 17:52:54

Hallo,
wenn die Tabellen durchnummeriert sind (Tab1, Tab2 etc):
=TEIL(ZELLE("Dateiname";INDIREKT("Tabelle" &ZEILE() &"!A1"));FINDEN("]";ZELLE("Dateiname";INDIREKT("Tabelle" &ZEILE() &"!A1")))+1;255)
Datei muss gespeichert sein.
Gruß
Geist ist geil!