Blattregister nach Farbe sortieren (Excel)
01.01.2011

In der Tat ist es praktisch, Blattregistern Farben zuzuweisen, indem Sie sie mit der rechten Maustaste anklicken und anschließend den Kontextmenübefehl Registerfarbe anwählen.

Es ist allerdings nicht möglich, diese Befehlsauswahl zu überwachen, um in Abhängigkeit davon eine farbliche Sortierung vorzunehmen. Anbieten können wir Ihnen aber eine halbautomatische Lösung, bei der Sie die Sortierung von einem VBA-Makro durchführen lassen. Das Makro müssen Sie dann jedes Mal per Hand aufrufen. Hier die Schritte zur fertigen Lösung:

Öffnen Sie die Arbeitsmappe mit den farbigen Blattregistern.

Drücken Sie Alt + F11, um den Visual Basic-Editor zu starten.

Legen Sie ein neues Codefenster an, indem Sie Einfügen-Modul anwählen.

Geben Sie folgende Sortierprozedur ein:

Sub Farbsortierung()
Dim i As Long, j As Long
For i = 1 To Worksheets.Count - 1
For j = i To Worksheets.Count
If Worksheets(j).Tab.ColorIndex = _
Worksheets(i).Tab.ColorIndex Then
Worksheets(j).Move After:=Worksheets(i)
End If
Next j
Next i
End Sub

Verlassen Sie den Visual Basic-Editor über das Menü Datei und den Befehl Schließen und zurück zu Microsoft Excel.

Rufen Sie in Excel Extras-Makro-Makros auf.

Markieren Sie den Makronamen "Farbsortierung" und starten Sie das Makro mit der Schaltfläche Ausführen.

Daraufhin sortiert Excel die Register nach Farben. Register mit dem gleichen Farbton werden aber nicht weiter sortiert.

Öffnungszeiten
Ladengeschäft:
Montag bis Donnerstag
15:00-18:00 Uhr
Freitag
8:30:13:00 Uhr
Samstag
nach Terminvereinbarung

Wir vereinbaren auch
gerne Termine über unsere
Öffnungszeiten hinaus.

Telefon:
06723 889005

Telefax:
06723 889006

E-Mail:
info@tibe.de

Adresse:
Tibe Services
Inhaber: Tim Berlebach
Zangerstraße 22
65375 Oestrich-Winkel /
Ortsteil Hallgarten

Öffentlicher Parkplatz:
Taunusstraße/
Ecke Zangerstraße

 Preisänderungen und Irrtümer bleiben vorbehalten.  Angebot gilt solange Vorrat reicht!