Blattregister sortieren

Forumthread: Blattregister sortieren
4 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Blattregister sortieren

25.04.2006 14: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

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Blattregister sortieren

25.04.2006 14:35:17

Matthias
AW: Blattregister sortieren

25.04.2006 14:46:28

Günter
AW: Blattregister sortieren

25.04.2006 14:42:32

Uduuh
AW: Blattregister sortieren

25.04.2006 14:51:43

Günter

AW: Blattregister sortieren

25.04.2006 14:35:17

Matthias

Hallo Günter,
schau mal ins Archiv:
https://www.google.de/search?hl=de&q=bl%C3%A4tter+sortieren+site%3Awww.herber.de&btnG=Google-Suche&meta=
Gruß Matthias

AW: Blattregister sortieren

25.04.2006 14:46:28

Günter

okay, danke.
Günter

AW: Blattregister sortieren

25.04.2006 14: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ß ausm Pott
Udo

AW: Blattregister sortieren

25.04.2006 14: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