Cum se sortează automat coloana după valoare în Excel?
De exemplu, aveți un tabel de achiziții, așa cum se arată mai jos. Acum doriți ca coloana Preț să fie sortată automat când introduceți numere/prețuri noi în această coloană, cum ați putea să o rezolvați? Aici introduc o macrocomandă VBA pentru a vă ajuta să sortați automat o anumită coloană după valoare în Excel.
Sortați automat coloana după valoare cu VBA
Sortați automat coloana după valoare cu VBA
Această macrocomandă VBA va sorta automat toate datele dintr-o coloană specifică imediat ce introduceți date noi sau modificați valoarea în coloană în Excel.
1. Faceți clic dreapta pe numele curent al foii în Bara de file Foaie, apoi faceți clic pe Afișați codul din meniul cu clic dreapta.
2. În caseta de dialog Microsoft Visual Basic pentru aplicație, lipiți următorul cod macro VBA în fereastra de deschidere.
VBA: Coloana de sortare automată în Excel
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
notițe:
1) În codul vba de mai sus, B: B înseamnă că va sorta automat coloana B, B1 este prima celulă din coloana B, B2 este a doua celulă din coloana B și le puteți modifica în funcție de nevoile dvs.
2) Fragmentul Antet:=xlDa în al 5-lea rând îi spune Excel că intervalul pe care îl veți sorta are un antet, astfel încât primul rând al intervalului nu va fi inclus la sortare. Dacă nu există antet, schimbați-l în Antet:=xlNr; și schimbare Key1:=Range ("B2") în al 4-lea rând la Key1:=Range ("B1").
3. Apoi reveniți la foaia de lucru, când introduceți un număr nou în coloana Preț sau modificați orice prețuri existente, coloana Preț va fi sortată automat în ordine crescătoare.
notițe: Când introduceți un număr nou în coloana Preț, trebuie să introduceți numărul în prima celulă goală de sub numerele originale. Dacă există celule goale între noul număr introdus și numerele originale, precum și celule goale între numerele originale, această coloană nu va fi sortată automat.
Demo: Sortează automat coloana după valoare cu VBA în Excel
Sortează cu ușurință după frecvența aparițiilor în Excel
Kutools pentru Excel Sortare avansată utilitarul acceptă sortarea rapidă a datelor după lungimea textului, numele de familie, valoarea absolută, frecvența etc. în Excel.

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!






























