Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
340to344
340to344
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

absteigend sortieren

Forumthread: absteigend sortieren

absteigend sortieren
25.11.2003 09:22:07
armer mensch
HI, ich müsste eine Tabelle in der Spalte A Absteigend sortieren, damit ein anderes Makro einwandfrei funktioniert. Wie muss der makro-Text lauten, damit dfer Pc das von Sleber tut??
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: absteigend sortieren
25.11.2003 09:25:36
PeterW
Hallo,

zeichne dir das doch mit dem Makrorekorder auf.

Gruß
Peter
PS: schau bitte mal in die Forums-FAQ
AW: absteigend sortieren
25.11.2003 10:10:24
Der gleiche
er will das dann aber net reinhaben :S


wie kann ich hier noch das absteigende Sortieren von A einbauen?

Dim iZeile As Long, rZeile As Long

For iZeile = Range("a65536").End(xlUp).Row To 2 Step -1
If WorksheetFunction.CountIf(Range("A1:A" & iZeile - 1), Cells(iZeile, 1)) > 0 Then

rZeile = WorksheetFunction.Match(Cells(iZeile, 1), Range("A1:A" & iZeile - 1), 0)
Cells(rZeile, 2) = Cells(rZeile, 2) & ", " & Cells(iZeile, 2)
Rows(iZeile).EntireRow.Delete

End If
Next iZeile
Anzeige
AW: absteigend sortieren
25.11.2003 13:37:24
PeterW
Hallo ???,

erstens ist deine Frage nicht ohne Relevanz, hebe dir hier den Code aufgezeichnet mit XP:
Cells.sort Key1:=Range("A2"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Zweitens würde ich das Sortieren vor die For-Next Schleife legen.

Drittens werde ich keine weiteren Fragen beantworten, wenn du es nicht für nötig hältst, einen Blick in die Forums-FAQ zu werfen und dich entsprechend zu verhalten.

Gruß
Peter
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige