Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
132to136
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
132to136
132to136
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

aulistung

aulistung
05.07.2002 17:29:41
Herbert Gius
Ich möchte in einer Datei in der Spalte A der Tabelle1 alle in dieser Datei vorhandenen Tabellen auslisten.
Danke für die Hilfe Herbert

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

Betreff
Datum
Anwender
Anzeige
Re: aulistung
05.07.2002 17:48:32
Dieter Klemke
Hallo Herbert,
du kannst das durch das folgende Programm erreichen:

Sub BlattAuflistung()
Dim i As Long
Dim ws As Worksheet
Dim ws1 As Worksheet

Set ws1 = ThisWorkbook.Worksheets(1)
i = 1
For Each ws In ThisWorkbook.Worksheets
ws1.Cells(i, 1) = ws.Name
i = i + 1
Next ws
End Sub

Viele Grüße
Dieter

Re: aulistung
05.07.2002 17:49:27
PeterW
Hallo Herbert,

folgenden Code im VBA-Editor in "Tabelle1" eingeben/kopieren

Gruß
Peter


Re: aulistung
05.07.2002 18:15:59
Herbert
Danke für die Lösung

Herbert

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige