Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
860to864
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
860to864
860to864
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

860to864: Tabellennamen aus Workbook auslesen

Tabellennamen aus Workbook auslesen
04.04.2007 11:00:18
jensp
Hallo,
kennt jemand eine schnelle Lösung, wie ich die Namen der Tabellenblätter aus einem Woorkbook auslesen kann?
Danke!
jens

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellennamen aus Workbook auslesen
04.04.2007 11:09:00
Oberschlumpf
Hi Jens
So:

Sub Auslesen()
Dim liIndex As Integer
For liIndex = 1 to ThisWorkbook.Sheets.Count
MsgBox ThisWorkbook.Sheets(liIndex).Name
Next
End Sub
Konnte ich helfen?
Ciao
Thorsten
AW: Tabellennamen aus Workbook auslesen
04.04.2007 11:21:00
jensp
Hallo Thorsten,
ja, danke, funktioniert!
Allerdings hast Du next liIndex vergessen!
Gruss jens
AW: Tabellennamen aus Workbook auslesen
04.04.2007 12:19:00
Oberschlumpf
Hi Jens
Habe Next liIndex nich vergessen - Next kann auch alleine stehen
Ciao
Thorsten
AW: Tabellennamen aus Workbook auslesen
04.04.2007 11:17:00
Kay
Hallo Jens,
so vieleicht:

Sub Tabellennamen()
Dim vntName As Variant
Dim i As Integer
For i = 1 To Worksheets.Count
vntName = vntName & Chr(10) & Worksheets(i).Name
Next i
MsgBox vntName
End Sub
MfG
Kay
Anzeige

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige