Hallo Forum,

mit folgendem Code fülle ich eine ComboBox in einem Formular mit allen verfügbaren Tabellenblättern:

Private Sub UserForm_Initialize()
  For Each sht In Worksheets
    ComboBox1.AddItem sht.Name
  Next sht
  ComboBox1.MatchRequired = True
  ComboBox1.Value = Sheets(2).Name
End Sub

Wie kann ich es anstellen, das mir nur bestimmte Tabellenblätter angezeigt werden?

Bsp. Von 20 Blättern nur Blatt 3 bis 15.

Danke schonmal für eure Unterstützung!

LG

René