Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 12:46:38
Nutzereingaben Speichern und Laden
26.04.2024 11:49:48
VAB und Bedingte Formatierung nimmt die Farbe im Makro nicht
26.04.2024 11:38:46
Acrobat PDF Formularfelder mit Excel ausfüllen
26.04.2024 11:23:04
zählen wenn - aber nur die selektierten Zeilen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
812to816
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
812to816
812to816
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblätter sortieren (nicht alphabetisch)

Tabellenblätter sortieren (nicht alphabetisch)
23.10.2006 14:33:20
snoopyine
Hallo zusammen,
ich bräuchte mal wieder eure Hilfe.
Ich möchte mittles Makro meine Tabellenblätter sortieren, aber nicht aplphabetisch, sondern nach einer bestimmten vorgegebenen Reihenfolge.
Für Tipps und Ratschläge wäre ich sehr dankbar.
Gruß
snoopyine

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblätter sortieren (nicht alphabetisch)
23.10.2006 14:42:27
Daniel
Hallo
so zum beispiel:
Sheet an den Anfang sortieren:
Sheets("Daten").Move Before:=Sheets(1)
Sheet ans Ende sortieren:
Sheets("Daten").Move after:=sheets(Activeworkbook.sheets.count)
Die Reihenfolge ist bisher nur dir bekannt.
Gruß, Daniel
AW: Tabellenblätter sortieren (nicht alphabetisch)
23.10.2006 15:11:48
snoopyine
Hallo Daniel.
Die Befehle move before/after sind mir bekannt. mein problem ist nur, ich will nicht für jedes Datenblatt den Befehl eingeben. Da sich die Reihenfolge auch ändern kann.
Kann man das nicht so lösen, das Excel sich die Sortierfolge aus eine anderen Tabelle zieht?
Gruß
Snoopyine
AW: Tabellenblätter sortieren (nicht alphabetisch)
23.10.2006 15:36:12
Daniel
Hallo
sollte gehen.
Wenn die Namen aller deiner Tabellenblätter im sheet("Tabelle1") untereinander in der von dir gewünschten Reihenfolge stehen, mit dieser Schleife:


for each Zelle in Sheets("Tabelle1").range("A1").currentregion

sheets(Zelle.value).Move after:=sheets(thisworkbook.sheets.count)

next

Gruß, Daniel
Anzeige
AW: Tabellenblätter sortieren (nicht alphabetisch)
23.10.2006 16:59:07
snoopyine
Hallo Daniel.
danke erst einmal.
habe es mal wie folgt abgeändert funktioniert aber nicht.
ich habe die Reihenfolge in Sheet1
dim i as long
i=99
i=i+1
for each Cells(i,1) in Worksheets(1).range("A100").currentregion
sheets(cells(i,1).value).Move after:=sheets(thisworkbook.sheets.count)next
Excel hat problem mit dem RangeObject und currentregion.
Kannst du mir weiterhelfen?
gruß
AW: Tabellenblätter sortieren (nicht alphabetisch)
23.10.2006 18:28:36
Daniel
Hallo
die ForEach-Schleife muß so aus sehen:

Sub Test()
Dim Zelle As Range
For Each Zelle In Sheets("Tabelle1").Range("A1").CurrentRegion.cells
Sheets(Zelle.Value).Move after:=Sheets(ThisWorkbook.Sheets.Count)
Next
End Sub

Die TabNamen stehen im Sheet Tabelle1 ab Zelle A1 abwärts
kann sein, daß ich das .Cells am Ende vergessen habe.
Manchmal braucht mans, manchmal gehts ohne.
Mit i oder sonstigen Schleifenzählern brauchst du bei ForEACH nicht zu arbeiten, das Range-Objekt Zelle wird nacheinander auf jede einzelne Zelle des Benannten Range-Objekts gesetzt.
Damit CurrentRegion funktioniert, müssen die Sheetnamen in einer lückenlosen Reihenfolge untereinander stehen und die rundherum angrenzenden Zellen müssen leer sein.
Wenn sich die Anzahl deiner Sheets nicht ständig ändert, kannst du den Zellbereich auch direkt angeben:
For each Zelle in Sheets("Tabell1").range("A100:A120")
mit dem Currentregion spare ich mir halt das anpaasen des Zellbereichs.
Currentregion hat den gleichen Effekt wie die Tastenkombination +
Damit kannst du Testen, ob der Richtige Zellbereich selektiert wird.
Gruß, Daniel
Anzeige
AW: Tabellenblätter sortieren (nicht alphabetisch)
24.10.2006 10:27:36
snoopyine
Vielen vielen Danke Daniel !!
Funktioniert super und ich habe es jetzt auch verstanden !!!
Grüße
snoopyine
AW: Tabellenblätter sortieren (nicht alphabetisch)
24.10.2006 10:50:59
snoopyine
Hallo,
habe jetzt doch noch ein kleines Problem. Es funktioniert super. Nur wenn ich es in ein SUB einbinde oder per Call aus einem anderen Modul sarten möchhte, kommt immer die Fehlermedlung :
LFZ 1004: Die Currentregion-Eigenschaft des RangeObjectes kann nicht zugeordnet werden.
Ein Idee an was das liegt?
Gruß
snoopyine
AW: Tabellenblätter sortieren (nicht alphabetisch)
24.10.2006 11:20:37
snoopyine
Hallo daniel,
habe den Fehler nun endlich lösen können.
Ich habe vergessen mein Blatt zu aktivieren in dem meine Liste ist nach der ich sortieren will.
Danke
snoopyine
Anzeige

302 Forumthreads zu ähnlichen Themen

Tabelle nach Anzahl sortieren
Pascal

Hallo,
wie kann ich eine Tablle nach der Anzahl der Wörter in einer Spalte sortieren?
Die Tabelle sieht etwa so aus:
Spalte1 | Spalte2 | Spalte 3
1 | der die | ...
2 | der | ...
3 | der die das | ...
und aussehen soll...
25.09.2008 11:50:39
Thread-ID: 1012284
6 Beiträge
Anzeige
Makro funktioniert nicht richtig, Werte auslesen
Uwe

Hallo zusammen, habe folgendes Problem in dem beigefügtem Makro funktioniert es nicht das er die Werte 2 und 3 aus der Tabelle ausliest. Wert 1 geht wunderbar. Hat jemand eine Lösung?
Hallo Uwe,
unregelmäßig aufgebaute Tabellen per Makro abzuarbeiten ist immer ziemlich aufwendig zu prog...
07.11.2008 08:22:00
Thread-ID: 1022502
2 Beiträge
Tabelle nach Namen durchsuchen -> Wert ausgeben
Aschi

Hallo,
ist es möglich mit einer Excel Funktion eine Tabelle nach gewissen Informationen zu durchlaufen und in einer anderen Zelle dann einen entsprechenden Wert auszugeben?
Also z.B. ich habe eine Liste und in der Zelle E steht „1. FC Köln“, eine Zeile darunter steht in E „FC Bayern Mün...
02.12.2008 16:17:12
Thread-ID: 1029551
8 Beiträge
Anzeige
Tabelle sortiert nicht im Netzwerk ?
A.Franz

Hallo...,
ich hoffe wirklich bei meinem nachfolgendem Problem kann mir jemand helfen,da ich mir das ganze nicht erklären kann.Ich habe eine ListBox mit 5-Spalten die über Row-Source A1:E gefüllt wird.Weiterhin habe ich eine Textbox über die ich einen Suchbegriff für die Auftragsnummer einge...
12.12.2008 11:25:00
Thread-ID: 1032340
2 Beiträge
Autofilter über Makro funktioniert nicht mehr
Ramon

Hallo Excel-Freunde,
ich habe ein ganz komisches Problem:
Wenn ich im Makro die Autofilter-Funktion einbinde, wird beim ausführen des entsprechenden
Makros in dem Modul der Begriff "Autofilter" gelb markiert, mit der Fehlermeldung:
"Fehler beim kompilieren:
Methode oder Date...
23.01.2009 15:01:21
Thread-ID: 1043020
3 Beiträge
Tabellen sortiere und nach wert in zelle
Walli

Guten Tag,
ich habe folgendes Makro für das Sortieren der Tabellenblätter
gefunden, funktioniert auch.:
Sub Tabellenblätter_sortieren() Dim Cnt As Integer Dim N As Integer Dim M As Integer On Error GoTo EndOfMacro Application.ScreenUpdating = False Cnt = ActiveWorkbook.Worksheets....
21.02.2009 11:24:43
Thread-ID: 1052581
7 Beiträge
Auto open funktioniert nicht richtig
Bodo

Guten Tag.
Ich versuche diesen Code hier zum Laufen zu bringen.
Sub Auto_open() ' Auto_öffnen Makro ' Blatt "Grundwerte" ausblenden. Unnötiges ausblenden. Blatt "Hinweise" aktivieren. In Vollbild- _ Modus schalten. Sheets("Grundwerte").Visible = False Sheets("Hinweise").Select ActiveW...
25.02.2009 14:31:35
Thread-ID: 1053941
6 Beiträge
Tabellen in Datei sortieren aber nach ...
walli

Guten Morgen,
ich habe eine große Datei mit vielen Tabellen.
Die Tabellen haben Namen z.B. Busch und Busch M also der gleiche Name
aber nach dem Namen Leerzeichen und ein großes M.
Ich möchte die Tabellen automatisch nach Namen sortieren + direkt
daneben jeweils die Tabe...
18.03.2009 09:17:28
Thread-ID: 1061282
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
7
1
7
3
1
2
6
5
2
4
10
16
2
6
2
10
2
4
3
2
14
4
2
1