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

Blattregister sortieren

Forumthread: Blattregister sortieren

Blattregister sortieren
25.04.2006 12:26:59
Günter
Hallo zusammen,
ich habe mehrere Blätter (25) nach Namen betitelt. Gibt es eine Möglichkeit die nach Alphabet zu sortieren?
Günter
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blattregister sortieren
25.04.2006 12:46:28
Günter
okay, danke.
Günter
AW: Blattregister sortieren
25.04.2006 12:42:32
Uduuh
Hallo,

Sub SheetSortName()
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 UCase(Worksheets(y).Name) < UCase(Worksheets(x).Name) Then
Worksheets(y).Move before:=Worksheets(x)
End If
Next y
Next x
End Sub

Gruß aus’m Pott
Udo

Anzeige
AW: Blattregister sortieren
25.04.2006 12:51:43
Günter
jepp, hat geklappt.
hab zwar keine Ahnung von VBA, aber es hat funktioniert.
Immerhin weiß ich wo der code hingehört.
Danke
Günter
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige