Wenn sich die Anzahl der Tabs in Ihrem Buch auf mehrere Dutzend beläuft, besteht früher oder später der Wunsch, sie umzusetzen Sortieren von Blättern in einem Buch , indem Sie sie in alphabetischer Reihenfolge anordnen. Mit den Standardtools von Excel ist dies nicht möglich. Schreiben wir also ein einfaches Makro, das dies erledigt.
Öffnen Sie das Menü Dienst – Makro – Editor Visual Basic (Tools - Macro - Visual Basic Editor) , Modul VBA einfügen (Speisekarte Insert - Module ) und kopieren Sie diesen Text dorthin:
Sub SortSheets()
'moonexcel.com.ua
Dim I As Integer, J As Integer
For I = 1 To Sheets.Count - 1
For J = I + 1 To Sheets.Count
If UCase(Sheets(I).Name) > UCase(Sheets(J).Name) Then
Sheets(J).Move Before:=Sheets(I)
End If
Next J
Next I
MsgBox " Die Tabs wurden von A bis Z sortiert "
End Sub
Dieses Makro kann nun über das Menü ausgeführt werden Service - Makro - Makros (Tools - Macro - Macros) , und alle Blätter in der aktuellen Arbeitsmappe werden schnell sortiert.
