Auswahliste mit Auswahl der Tabellennamen

23/06/2009 - 11:53 von hpreisker | Report spam
Guten Tag,
ich krieg das nicht hin.
Eine Excel-Datei mit mehreren Tabellen. Es werden dauernd weitere Tabellen
hinzugefügt. Die Namen der Tabellen stehen vorher nicht fest.
Diese Tabellennamen brauche ich in einer Dropdown-Auswahlliste.

Beispiel: es existieren zB die Tabellen "KW28", "abKW30", "UrlaubKW35".
Weitere Tabellen werden hinzugefügt, die Namen stehen jetzt noch nocht fest,
so kann zB nàchste Woche die Tabelle "KW36Meier" hinzugefügt werden.

In einer Auswertungs-Tabelle benötige ich ein Drop-Down-Menü, das als
Auswahl die Namen der gerade existierenden Tabellen anzeigt.
Hat jemand einen Tip?
Mfg Hans
 

Lesen sie die antworten

#1 Andreas Killer
23/06/2009 - 12:33 | Warnen spam
On 23 Jun., 11:53,
@discussions.microsoft.com> wrote:

Eine Excel-Datei mit mehreren Tabellen. Es werden dauernd weitere Tabellen
hinzugefügt. Die Namen der Tabellen stehen vorher nicht fest.
Diese Tabellennamen brauche ich in einer Dropdown-Auswahlliste.


Nun als erstes brauchst Du alle Namen, die holen wir mit einem kleinen
Makro in das aktuelle Blatt in Spalte A:

Sub HoleTabellennamen()
Dim S As Worksheet, Y As Long
'Starte bei Zeile 1
Y = 1
'Alle Blàtter durchlaufen
For Each S In Sheets
'Ist es dieses Blatt?
If S.Name <> ActiveSheet.Name Then
'In Spalte A hinzufügen
Cells(Y, 1) = S.Name
'Nàchste Zeile
Y = Y + 1
End If
Next
End Sub

und dann macht Du auf Deine Zelle via Daten\Gültigkeit\Zulassen Liste
Quelle A:A Dir Dein Dropdown.

Andreas.

Ähnliche fragen