Kako samodejno razvrstiti stolpec po vrednosti v Excelu?
Na primer, imate tabelo nakupov, kot je prikazano na spodnjem posnetku zaslona. Zdaj želite, da se stolpec Cena samodejno razvrsti, ko vnesete nove številke/cene v ta stolpec, kako bi to rešili? Tukaj predstavljam makro VBA, ki vam pomaga samodejno razvrstiti določen stolpec po vrednosti v Excelu.
Samodejno razvrsti stolpec po vrednosti z VBA
Samodejno razvrsti stolpec po vrednosti z VBA
Ta makro VBA bo samodejno razvrstil vse podatke v določenem stolpcu takoj, ko vnesete nove podatke ali spremenite vrednost v stolpec v Excelu.
1. Z desno miškino tipko kliknite trenutno ime lista v Vrstica z zavihki listain nato kliknite Ogled kode v meniju z desnim klikom.
2. V začetno pogovorno okno Microsoft Visual Basic for Application prilepite naslednjo kodo makra VBA v začetno okno.
VBA: Stolpec za samodejno razvrščanje v Excelu
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("B:B")) Is Nothing Then
Range("B1").Sort Key1:=Range("B2"), _
Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, _
Orientation:=xlTopToBottom
End If
End Sub
Opombe:
1) V zgornji kodi vba B: B pomeni, da bo samodejno razvrstil stolpec B, B1 je prva celica v stolpcu B, B2 je druga celica v stolpcu B in jih lahko spremenite glede na svoje potrebe.
2) Delček Glava:=xlDa v 5. vrstici sporoči Excelu, da ima obseg, ki ga boste razvrstili, glavo, tako da prva vrstica obsega ne bo vključena pri razvrščanju. Če ni glave, jo spremenite v Glava:=xlŠt; in spremeniti Ključ1:=Razpon("B2") v 4. vrsti do Ključ1:=Razpon("B1").
3. Nato se vrnite na delovni list, ko vnesete novo številko v stolpec Cena ali spremenite obstoječe cene, bo stolpec Cena samodejno razvrščen v naraščajočem vrstnem redu.
Opombe: Ko v stolpec Cena vnesete novo številko, morate številko vnesti v prvo prazno celico pod prvotnimi številkami. Če so prazne celice med novo vneseno številko in originalnimi številkami ter prazne celice med originalnimi številkami, ta stolpec ne bo samodejno razvrščen.
Predstavitev: Samodejno razvrsti stolpec po vrednosti z VBA v Excelu
Enostavno razvrstite po pogostnosti pojavitev v Excelu
Kutools za Excel Napredno razvrščanje pripomoček podpira hitro razvrščanje podatkov po dolžini besedila, priimku, absolutni vrednosti, pogostosti itd.
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!