Kako samodejno razvrstiti datum, ko je datum vnesen ali spremenjen v Excelu?
V Excelu je Razvrščanje funkcija vam lahko pomaga razvrstiti datum po naraščajočem ali padajočem vrstnem redu, kot ga potrebujete. Vendar ni dinamičen, če ste datum razvrstili in mu nato dodali nov datum, ga boste morali znova razvrstiti. Ali obstajajo dobri in hitri načini za samodejno razvrščanje datuma ob vsakem vnosu novega datuma v delovni list?
Datum samodejnega razvrščanja, ko datum vnesete ali spremenite s formulo
Datum samodejnega razvrščanja, ko je datum vnesen ali spremenjen s kodo VBA
Datum samodejnega razvrščanja, ko datum vnesete ali spremenite s formulo
Na primer prvotni datum v stolpcu A, naslednja formula vam lahko pomaga pri samodejnem razvrščanju datuma ali drugih besedilnih nizov v novem pomožnem stolpcu glede na stolpec, ki ga želite razvrstiti, storite tako:
1. Vnesite to formulo:
=INDEX($A$2:$A$15,MATCH(ROWS($A$2:A2),COUNTIF($A$2:$A$15,"<="&$A$2:$A$15),0)) v prazno celico poleg stolpca z datumi, C2na primer in pritisnite Ctrl + Shift + Enter tipke skupaj in dobili boste zaporedje številk, nato povlecite ročico za polnjenje navzdol do celic, ki jih želite uporabiti, glejte posnetek zaslona:
Opombe: V zgornji formuli: A2: A15 je prvotno časovno obdobje, ki ga želite samodejno razvrstiti.
2. Nato s klikom oblikujte številke kot obliko datuma Kratek zmenek Iz splošno spustni seznam pod Domov zavihek, glej posnetek zaslona:
3. Nato so zaporedne številke pretvorjene v obliko datuma in razvrščen tudi prvotni datum, glejte posnetek zaslona:
4. Od zdaj naprej, ko vnašate nov datum ali spremenite datum v stolpec A, bo datum v stolpcu C samodejno razvrščen v naraščajočem vrstnem redu, glejte sliko zaslona:
Datum samodejnega razvrščanja, ko je datum vnesen ali spremenjen s kodo VBA
Naslednja koda VBA vam lahko pomaga pri samodejnem razvrščanju datuma v prvotnem stolpcu, ko vnesete nov datum ali spremenite datum, kot ga potrebujete.
1. Pojdite na delovni list, v katerem želite samodejno razvrstiti datum, ko vnesete ali spremenite datum.
2. Z desno miškino tipko kliknite zavihek lista in izberite Ogled kode iz kontekstnega menija v izpuščenem Microsoft Visual Basic za aplikacije okno, kopirajte in prilepite naslednjo kodo v prazno Moduli okno, glej posnetek zaslona:
Koda VBA: samodejno razvrščanje ob vnosu ali spremembi datuma:
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
Opombe: V zgornji kodi bo vneseni datum samodejno razvrščen v stolpec A, lahko ga spremenite A1 in A2 v lastne celice, kot jih potrebujete.
3. Od zdaj naprej, ko vnesete datum v stolpec A, bo datum samodejno razvrščen naraščajoče.
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
