Hallo zusammen,

ich möchte mittels VBA/Makro und einem checkbutton eine Auflistung der Worksheet.namen erhalten, die sich zwischen dem Tabellenblatt "Start" und Tabellenblatt "Ende" befinden.

Die Auflistung sollte direkt unter dem Checkbutton erfolgen. Leider habe ich nur Quellcodes bezüglich Auslesen aller Tabellenname gefunden, dies funktioniert auch. Aber die Eingrenzung zwischen dem Blatt "Start" und  "Ende" bekomme ich nicht hin, vielleicht kann man dies mit Hilfe einer If Bedingung/ Abbruchbedingung hinbekommen.

Private Sub CommandButton1_Click()

Dim blatt As Object
Dim zeile As Double

zeile = 7

For Each blatt In sheets
  
    ActiveSheet.Cells(zeile, 14).Value = blatt.Name
    zeile = zeile + 1
   
Next blatt

End Sub

Danke im Voraus für die Ratschläge.

Viele Grüße

Franziska