Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

nach Registerfarbe sortieren

Forumthread: nach Registerfarbe sortieren

nach Registerfarbe sortieren
24.11.2003 11:13:49
golem
Hallo,
Kann man alle Tabellenblätter nach der Registerfarbe sortieren bzw gruppieren?
mfg Goli
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: nach Registerfarbe sortieren
24.11.2003 11:55:17
xXx
Hallo,
du musst die Color-Eigenschaft des TAb auswerten:

Sub SheetSortColor()
Dim x As Integer, y As Integer, wsCount As Integer
wsCount = ActiveWorkbook.Worksheets.Count
For x = 1 To wsCount
For y = x To wsCount
If Worksheets(y).Tab.Color < Worksheets(x).Tab.Color Then
Worksheets(y).Move before:=Worksheets(x)
End If
Next y
Next x
End Sub

Gruß aus'm Pott
Udo
Anzeige
AW: nach Registerfarbe sortieren
24.11.2003 12:49:52
golem
es klappt!!!
Ich danke Dir!
Gruß
Goli
;

Forumthreads zu verwandten Themen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige