Note: The other languages of the website are Google-translated. Back to English

Wie sortiere ich das Datum automatisch, wenn das Datum in Excel eingegeben oder geändert wird? 

In Excel wird die Sortieren Mit dieser Funktion können Sie das Datum nach Bedarf in aufsteigender oder absteigender Reihenfolge sortieren. Es ist jedoch nicht dynamisch. Wenn Sie das Datum sortiert und dann ein neues Datum hinzugefügt haben, müssen Sie es erneut sortieren. Gibt es gute und schnelle Möglichkeiten, das Datum automatisch zu sortieren, wenn Sie jedes Mal ein neues Datum in ein Arbeitsblatt eingeben?

Automatisches Sortierdatum, wenn das Datum mit der Formel eingegeben oder geändert wird

Automatisches Sortierdatum, wenn das Datum mit VBA-Code eingegeben oder geändert wird


Pfeil blau rechte Blase Automatisches Sortierdatum, wenn das Datum mit der Formel eingegeben oder geändert wird

Beispiel: Das ursprüngliche Datum in Spalte A, die folgende Formel kann Ihnen helfen, das Datum oder andere Textzeichenfolgen in einer neuen Hilfsspalte basierend auf der Spalte, die Sie sortieren möchten, automatisch zu sortieren. Gehen Sie wie folgt vor:

1. Geben Sie diese Formel ein:

=INDEX($A$2:$A$15,MATCH(ROWS($A$2:A2),COUNTIF($A$2:$A$15,"<="&$A$2:$A$15),0)) in eine leere Zelle neben Ihrer Datumsspalte, C2Zum Beispiel und drücken Sie dann Strg + Umschalt + Enter Wenn Sie die Tasten zusammen drücken, erhalten Sie eine Zahlenfolge. Ziehen Sie dann den Füllpunkt nach unten zu den Zellen, die Sie verwenden möchten. Siehe Screenshot:

Hinweis: In der obigen Formel: A2: A15 ist Ihr ursprünglicher Datumsbereich, den Sie automatisch sortieren möchten.

doc Autosortierung nach Datum 1

2. Formatieren Sie dann die Zahlen als Datumsformat, indem Sie auf klicken Kurzes Date von dem Allgemeines Dropdown-Liste unter Startseite Registerkarte, siehe Screenshot:

doc Autosortierung nach Datum 2

3. Dann wurden die Sequenznummern in das Datumsformat konvertiert und das ursprüngliche Datum wurde ebenfalls sortiert, siehe Screenshot:

doc Autosortierung nach Datum 3

4. Wenn Sie von nun an ein neues Datum eingeben oder das Datum in Spalte A ändern, wird das Datum in Spalte C automatisch in aufsteigender Reihenfolge sortiert (siehe Abbildung):

doc Autosortierung nach Datum 4


Pfeil blau rechte Blase Automatisches Sortierdatum, wenn das Datum mit VBA-Code eingegeben oder geändert wird

Der folgende VBA-Code kann Ihnen helfen, das Datum in der ursprünglichen Spalte automatisch zu sortieren, wenn Sie ein neues Datum eingeben oder das Datum nach Bedarf ändern.

1. Gehen Sie zu dem Arbeitsblatt, in dem Sie das Datum automatisch sortieren möchten, wenn Sie ein Datum eingeben oder ändern.

2. Klicken Sie mit der rechten Maustaste auf die Registerkarte Blatt und wählen Sie Code anzeigen aus dem Kontextmenü in der herausgesprungenen Microsoft Visual Basic für Applikationen Fenster, bitte kopieren Sie den folgenden Code und fügen Sie ihn in das Feld ein Modul Fenster, siehe Screenshot:

VBA-Code: Automatische Sortierung bei Eingabe oder Änderung des Datums:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    On Error Resume Next
    If Application.Intersect(Target, Application.Columns(1)) Is Nothing Then Exit Sub
    If Target.Count > 1 Then Exit Sub
    Range("A1").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlYes, _
                                        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

doc Autosortierung nach Datum 6

Hinweis: Im obigen Code wird das eingegebene Datum automatisch in Spalte A sortiert. Sie können es ändern A1 und A2 zu Ihren eigenen Zellen, wie Sie brauchen.

3. Wenn Sie von nun an das Datum in Spalte A eingeben, wird das Datum automatisch aufsteigend sortiert.


Die besten Tools für die Office-Produktivität

Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einfügen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen / Spalten... doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
  • Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
  • Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2021 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. 30-tägige kostenlose Testversion mit allen Funktionen. 60 Tage Geld-zurück-Garantie.
kte tab 201905

Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
officetab unten
Kommentare (15)
Noch keine Bewertungen. Bewerten Sie als Erster!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Sie haben vergessen zu erwähnen, dass die Formel ein Array ist und Sie Strg + Umschalt + Eingabetaste drücken müssen. Zum Glück hatten Sie einen Screenshot oder Ihre Seite wäre eine Verschwendung von Cyberspace
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Was ist, wenn es ein doppeltes Datum in der Liste gibt? Und ich möchte, dass beide Nummern angezeigt werden.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Ryan,

Um das Datum mit doppelten zu sortieren, sollten Sie die folgende Formel anwenden:

=IFERROR(INDEX($A$2:$A$11,MATCH(ROWS($A$2:A2),COUNTIF($A$2:$A$11,"<="&$A$2:$A$11),0)),IF(ROWS($A$2:A2)<ROWS($A$2:$A$11),B3,""))

Bitte denken Sie daran, die Tasten Umschalt + Strg + Eingabe gleichzeitig zu drücken.

Hoffe es kann dir helfen, danke!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Super :) Funktioniert gut
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Wie kann ich dieselbe Sortierberechnung durchführen, aber vom neuesten Datum zum ältesten? Derzeit ist es vom Ältesten zum Neuesten. Das Umdrehen des <-Zeichens reicht nicht aus, und darüber hinaus habe ich kein ausreichendes Verständnis dafür, was es tut. Ich denke auch, dass Excel automatisch von oben nach unten funktioniert und Schwierigkeiten verursacht.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Bo,

Um das Datum automatisch vom neuesten zum ältesten zu sortieren, müssen Sie nur das <= in der obigen Formel wie folgt in >= ändern:
=INDEX($A$2:$A$15,MATCH(ROWS($A$2:A2),COUNTIF($A$2:$A$15,">="&$A$2:$A$15),0))
Denken Sie nach dem Einfügen dieser Formel daran, die Tasten Strg + Umschalt + Eingabe gleichzeitig zu drücken, um das richtige Ergebnis zu erhalten.
Versuch es bitte.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Gibt es neben den doppelten Datumsangaben auch eine Möglichkeit, mehrere Datenspalten beim Sortieren einzubeziehen? Ich brauche es, um mehrere Spalten einzuschließen und sie alle zusammen mit den Ablaufdaten zu sortieren.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich habe ein Scheckbuch registriert und es funktioniert, aber ich möchte herausfinden, wie ich meine Einträge in die Datumsreihenfolge bringen kann. Jede Hilfe wäre willkommen. Ich lerne immer noch Excel.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Gibt es eine bestimmte Formel, um die Zellen nach dem sortierten Datum zu halten? Es wäre schön, nach Datum zu ordnen, aber die gesamte Informationszeile beizubehalten. Jede Hilfe wäre sehr willkommen.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Mit dem VBA-Code habe ich das Obige kopiert und eingefügt, möchte aber, dass die Daten in Spalte F die Werte sind, nach denen die Daten sortiert werden. Ich habe die Bereichswerte in F2 und F3500 geändert (die Größe der Tabelle, in der Zeile 1 Titel enthält), aber es wird immer noch nach den Daten in Spalte A sortiert. Kann mir bitte jemand helfen?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Roß,
Wenn Sie den Code auf Spalte F anwenden, sollten Sie einige Verweise auf Ihre Bedürfnisse wie den folgenden Code ändern:
Private Sub Worksheet_Change (ByVal-Ziel als Bereich)
'Updateby Extendoffice 20160606
On Error Resume Next
Wenn Application.Intersect(Target, Application.Columns(6)) nichts ist, dann beenden Sie Sub
Wenn Target.Count > 1, dann Sub verlassen
Range("F1").Sort Key1:=Range("F2"), Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

Bitte versuchen Sie es, ich hoffe, es kann Ihnen helfen!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Dieser VBA-Code ist Gold wert! Danke! :-)
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo, was ist, wenn ich dies für mehrere Spalten tun oder sogar einen neuen Startpunkt in derselben Spalte haben möchte? Mache ich einfach eine Pause und kopiere den VBA-Code im selben Fenster erneut?
Danke.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo, das ist ein tolles Tool. Danke. Wie kann ich dies auf mehrere Spalten auf derselben Registerkarte anwenden? Könnte ich es anwenden, um die Sortierung nach Datum in einer neuen Zelle derselben Spalte neu zu starten? Würde ich den VBA-Code einfach wieder in dasselbe Fenster einfügen?
Danke.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Noname9, wie geht es dir? Ihr Ziel mit VBA-Code zu erreichen, liegt außerhalb meiner Reichweite. Aber ich weiß, wie man Formeln verwendet, um den Trick zu machen. Angenommen, wir haben zwei Spalten mit Datumsangaben, sagen wir A2:B7. Wie sortiere ich diese Daten in eine neue Spalte? Bitte gehen Sie wie folgt vor.
Zuerst müssen wir die beiden Datumsspalten zu einer Spalte kombinieren. Kopieren und fügen Sie die Formel =INDEX($A$2:$B$7,INT((ROWS(D$2:D2)-1)/2)+1,MOD(ROWS(D$2:D2)-1,2)+ ein 1) in Zelle D2. Und ziehen Sie den Ausfüllgriff nach unten, um alle Daten zu kombinieren. Siehe Screenshot 1.
Dann werden wir die kombinierten Daten sortieren. Kopieren Sie die Formel und fügen Sie sie ein =INDEX($D$2:$D$13,MATCH(ROWS($D$2:D2),COUNTIF($D$2:$D$13,"<="&$D$2:$D$13) ,0)) in F2. Und ziehen Sie den Ausfüllgriff nach unten, um alle Daten zu sortieren. Siehe Screenshot 2.
Hoffe es wird helfen. Schönen Tag noch. Mit freundlichen Grüßen Mandy
Es sind noch keine Kommentare vorhanden
Hinterlassen Sie Ihre Kommentare
Als Gast posten
×
Bewerte diese Nachricht:
0   Figuren
Vorgeschlagene Standorte

Folgen Sie uns

Copyright © 2009 - www.extendoffice.com. | Alle Rechte vorbehalten. Unterstützt von ExtendOffice. | Sitemap
Microsoft und das Office-Logo sind Marken oder eingetragene Marken der Microsoft Corporation in den USA und / oder anderen Ländern.
Geschützt durch Sectigo SSL