Ich suche schon als im Forum und finde nicht die richtige Info....es gibit sowas nur leider habe ich wohl die falschen schlagworte.
Beispiel:
danke für jeden tip
gruß
Stefan
Sub Blattnamen()
Dim i As Integer
For i = 1 To Worksheets.Count
Cells(i, 1) = Worksheets(i).Name
Next i
End Sub