Microsoft Excel

Herbers Excel/VBA-Archiv

Arbeitsblätter

Betrifft: Arbeitsblätter von: Klaus
Geschrieben am: 30.08.2004 08:41:18

Guten Morgen zusammen
Ich möchte alle Arbeitsblätter der aktiven Mappe in einer neuen Tabelle aufgelistet haben, geht das irgendwie?

Gruss Klaus

  


Betrifft: AW: Arbeitsblätter von: OttoH
Geschrieben am: 30.08.2004 08:52:52

Hallo Klaus,

angenommen, die MAppe enthält ein leeres Blatt namens "Inhalt", dann klappt es mit folgendem Makro:


Sub Inhalt_der_Mappe()

Dim i As Integer

    Sheets("Inhalt").Select
    
    For i = 1 To Sheets.Count
        Cells(i, 1).Value = Sheets(i).Name
    Next
    
    
End Sub




Gruß OttoH


  


Betrifft: AW: Arbeitsblätter von: Klaus
Geschrieben am: 30.08.2004 09:00:05

Hallo Otto
Prima, danke, funktioniert prima
Gruss Klaus