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

aulistung

Forumthread: 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

Anzeige

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

Anzeige
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)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige