Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
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
1824to1828
1824to1828
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datum sortieren

Forumthread: Datum sortieren

Datum sortieren
16.04.2021 12:05:22
Werner
Hallo
habe eine Liste mit Terminen erstellt.
Nun soll nach erfolgter Eingabe in Spalte B die Daten in Zellen A3 Bis C12 automatisch nach den Datum in Spalte B (Aufsteigend) sortiert werden.
Die Spalte D wird automatisch berechnet.
Beispiel: in D3 steht 26.04.2021
in D4 steht 18.04.2021
Als Ergebnis soll dann 18.04.2021 oberhalb den 26.04.2021 stehen.
Die Spalten A3 bis A12 und C3 bis C12 müssen ach mit sortiert werden.
Habe die Datei unter
https://www.herber.de/bbs/user/145576.xlsm
hochgeladen.
Danke für euere Hilfe
Werner
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Datum sortieren
16.04.2021 12:36:55
Werner
Hallo Namensvetter,
Code gehört ins Codemodul von Tabelle1. 
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("B3:B12"), Target) Is Nothing Then
Sort.SortFields.Clear
Sort.SortFields.Add Key:=Range("B3:B12"), SortOn:=xlSortOnValues, _
Order:=xlAscending, DataOption:=xlSortNormal
With Sort
.SetRange Range("A2:D12")
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End If
End Sub

Gruß Werner
Anzeige
AW: Datum sortieren
16.04.2021 18:45:00
Werner
Hallo Werner
Klappt prima.
Vielen Dank
Werner
Gerne u. Danke für die Rückmeldung. o.w.T.
16.04.2021 19:55:01
Werner
;

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