Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
19.04.2024 13:58:02
Set Worksheet geht im O365 aber im Excel 2016 nicht
19.04.2024 13:49:38
Per Kopfdruck als pdf speichern und Mail erstellen
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
256to260
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
256to260
256to260
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblätter sortieren

Tabellenblätter sortieren
17.05.2003 01:08:04
Didi
Hi,

Die Tabellenblätter in einer Arbeitsmappe sollen alphabetisch sortiert werden.

Das Tabellenblatt mit dem Namen (Eingabe) soll nicht mitsortiert werden und an 1.Stelle stehen bleiben!

Vielen Dank

Gruß Didi



7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Tabellenblätter sortieren
17.05.2003 02:09:29
Didi

Hallo Peter,

zum Thema Tabellenblätter sortieren hab ich einiges gefunden, aber wie krieg ich es hin, daß das 1.Blatt (Eingabe) nicht mitsortiert wird und ganz links stehen bleibt ??

Gruß Didi


Re: Tabellenblätter sortieren
17.05.2003 02:23:11
PeterW

Hallo Didi,

wenn ich den Verweisen folge finde ich beispielsweise https://www.herber.de/forum/archiv/248to252/t251650.htm.

Wenn du in dem Code die Zeile
For i = 1 To AnzahlRegister - 1
änderst in
For i = 2 To AnzahlRegister - 1
sollte es wie gewünscht klappen.

Gruß
Peter

Anzeige
Re: Tabellenblätter sortieren
17.05.2003 02:58:52
Didi

Hallo Peter,

das klappt !

Danke

Gruß Didi

An Peter und Didi (als_Alternative)
17.05.2003 07:13:40
Franz W.

Hallo Didi,

ich hab mir das mit Hilfe der Recherche mal so gebastelt:

Was da jetzt besser ist, weiß ich nicht, musst Du ausprobieren.


Hallo Peter,

vielleicht kannst Du mir bitte eine Zusatzfrage beantworten: Tabellennamen, die mit einem Kleinbuchstaben beginnen, setzt er automatisch ans Ende aller Blätter. Ein Blatt mit dem Namen "als_Alternative" z. B. würde er als letztes setzen. Hättest dazu einen Tipp, wie man das hinkriegen könnte, dass das auch richtig nach Alphabet einsortiert wird.

Danke schon mal und Gruß
Franz


Anzeige
Re: An Peter und Didi (als_Alternative)
17.05.2003 07:23:36
Forum

Hallo Franz

schreibe

If Ucase(Worksheets(Y).Name) < Ucase(Worksheets(x).Name) Then

dann wird kein Unterschied zwischen Groß und Klein gemacht.

Gruß Hajo

Der Code wurde getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Oh! Das ist gut !! Vielen Dank !! ot
17.05.2003 07:45:38
Franz W.



Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige