hallo
mein problem ist das ich meine tabellenblätter gern sortiert haben möchte
habe aber auch zwei dabei ("Start" und "Muster") die an erster stelle stehen bleiben sollen.
mein folgender code leider nur alle Tabellen
k = ActiveWorkbook.Worksheets.Count
For i = 1 To k
For j = i To k

If Worksheets(j).Name kleriner Worksheets(i).Name Then
Worksheets(j).Move after:=Worksheets(i)
End If

Next j
Next i
kann jemand helfen
gruß rene