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

Automatische Sortierug

Forumthread: Automatische Sortierug

Automatische Sortierug
10.02.2005 10:11:22
Harald
Wie kann ich eine automatische Sortierung einer Tabelle nach öffnen einer Datei realisieren?

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Automatische Sortierug
10.02.2005 12:22:43
Eleni
Hi Harald,
Hier einer meiner Sortiercodes, hoffe er funktioniert bei dir. Bitte das Wort "kleiner" durch das Zeichen für Kleiner ersetzten:
Dim ws As Worksheet
Dim x As Integer, Y As Integer, wsCount As Integer
Set ws = ActiveSheet
wsCount = ThisWorkbook.Worksheets.Count
For x = 1 To wsCount
For Y = x To wsCount
If Worksheets(Y).Name "kleiner" Worksheets(x).Name Then
Worksheets(Y).Move before:=Worksheets(x)
End If
Next Y
Next x
x = 1
Set ws = Nothing
Ciao, Eleni
Anzeige
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18