Cum se sortează automat data când data este introdusă sau modificată în Excel?
În Excel, fișierul Sortează funcția vă poate ajuta să sortați data în ordine crescătoare sau descendentă după cum aveți nevoie. Dar nu este dinamic, dacă ați sortat data și apoi adăugați o dată nouă, ar trebui să o sortați din nou. Există modalități bune și rapide de a sorta automat data când introduceți data nouă de fiecare dată într-o foaie de lucru?
Sortează automat data când data este introdusă sau modificată cu formula
Sortați automat data când data este introdusă sau modificată cu codul VBA
Sortează automat data când data este introdusă sau modificată cu formula
De exemplu, data originală din coloana A, următoarea formulă vă poate ajuta să sortați automat data sau orice alte șiruri de text într-o nouă coloană de asistență pe baza coloanei pe care doriți să o sortați, vă rugăm să faceți următoarele:
1. Introduceți această formulă:
=INDEX($A$2:$A$15,MATCH(ROWS($A$2:A2),COUNTIF($A$2:$A$15,"<="&$A$2:$A$15),0)) într-o celulă goală lângă coloana dată, C2, de exemplu, și apoi apăsați Ctrl + Shift + Enter tastele împreună și veți obține o secvență numerică, apoi trageți mânerul de umplere în jos în celulele pe care doriți să le utilizați, consultați captura de ecran:
notițe: În formula de mai sus: A2: A15 este intervalul dvs. original de date pe care doriți să îl sortați automat.
2. Apoi formatați numerele ca format de dată făcând clic pe Data scurtă de la General lista derulantă sub Acasa fila, vezi captura de ecran:
3. Apoi, numerele de ordine au fost convertite în formatul de dată și data originală a fost sortată, de asemenea, a se vedea captura de ecran:
4. De acum înainte, când introduceți o dată nouă sau modificați data în coloana A, data din coloana C va fi sortată automat în ordine crescătoare, a se vedea captura de ecran:
Sortați automat data când data este introdusă sau modificată cu codul VBA
Următorul cod VBA vă poate ajuta să sortați automat data în coloana originală atunci când introduceți o dată nouă sau modificați data după cum aveți nevoie.
1. Accesați foaia de lucru pe care doriți să o sortați automat data când introduceți sau modificați o dată.
2. Faceți clic dreapta pe fila foaie și selectați Afișați codul din meniul contextual, în fereastra pop-out Microsoft Visual Basic pentru aplicații fereastra, copiați și lipiți următorul cod în spațiul gol Module fereastră, vezi captura de ecran:
Cod VBA: sortare automată la introducerea sau modificarea datei:
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
notițe: În codul de mai sus, data introdusă va fi sortare automată în coloana A, pe care o puteți modifica A1 și A2 către propriile celule după cum aveți nevoie.
3. De acum înainte, când introduceți data în coloana A, data va fi sortată crescând automat.
Cele mai bune instrumente de productivitate Office
Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%
- reutilizarea: Introduceți rapid formule complexe, diagrame și orice ai folosit anterior; Criptați celulele cu parola; Creați o listă de corespondență și trimiteți e-mailuri ...
- Super Formula Bar (editați cu ușurință mai multe linii de text și formulă); Layout de citire (citiți și editați cu ușurință un număr mare de celule); Lipiți la interval filtrat...
- Merge celule / rânduri / coloane fără a pierde date; Conținut de celule divizate; Combinați rânduri / coloane duplicate... Prevenirea celulelor duplicate; Comparați gamele...
- Selectați Duplicat sau Unic Rânduri; Selectați Rânduri goale (toate celulele sunt goale); Super Find și Fuzzy Find în multe cărți de lucru; Selectare aleatorie ...
- Copie exactă Mai multe celule fără modificarea referinței formulelor; Creați automat referințe la foi multiple; Introduceți gloanțe, Casete de selectare și multe altele ...
- Extrageți textul, Adăugați text, eliminați după poziție, Eliminați spațiul; Creați și imprimați subtotaluri de paginare; Convertiți conținutul dintre celule și comentarii...
- Super Filtru (salvați și aplicați scheme de filtrare altor foi); Sortare avansată după lună / săptămână / zi, frecvență și multe altele; Filtru special cu bold, italic ...
- Combinați cărți de lucru și foi de lucru; Merge Tables pe baza coloanelor cheie; Împărțiți datele în mai multe foi; Conversia în loturi xls, xlsx și PDF...
- Peste 300 de funcții puternice. Suportă Office / Excel 2007-2021 și 365. Acceptă toate limbile. Implementare ușoară în întreprinderea sau organizația dvs. Funcții complete Probă gratuită de 30 de zile. Garanție de returnare a banilor de 60 de zile.
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
