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 Inițial 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 de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
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!