tabellenblätter d. aktiven arbeitsmappe rausfinden

Falls du von einem UserForm sprichst ... das könnte so aussehen:

Private Sub UserForm_Initialize()
Dim i As Byte
   For i = 1 To Worksheets.Count
      ComboBox1.AddItem Worksheets(i).Name
   Next i
End Sub

www.jumper.ch
*** Generell: Bitte kein Crossposting ***

hi monika
klar hilft mir das weiter, vielen dank auch.
und übrigens:
es liebs grüessli üser schwiz!
rahel