Dette VBA-makro vil sortere alle data i en bestemt kolonne automatisk så snart du skriver inn nye data eller endring verdi i kolonnen i Excel.

Trinn 1 : Høyreklikk gjeldende ark navn i Tab Sheet linjen, og klikk deretter Vis kode fra høyreklikke menyen

Trinn 2:. I åpnings Microsoft Visual Basic for Application dialogboksen , lim inn følgende VBA-makro kode i åpningsvinduet

VBA. Auto Sorter kolonne i Excel
Private Sub Worksheet_Change (ByVal Target As Range) On Error Resume NextIf ikke overlappe ( Target, Range ("B: B").) Er Ingenting ThenRange ("B1") Sorter Key1: = Range ("B2"), _Order1: = xlAscending, Header: = xlYes, _OrderCustom: = 1, MatchCase: = False , _Orientation: = xlTopToBottomEnd IfEnd Sub

Merk: I ovennevnte VBA-kode, B: B betyr at det vil automatisk sortere kolonne B, er B1 den første cellen i kolonne B, er B2 den andre cellen i kolonne B, og du kan endre dem basert på dine behov

Trinn 3:. Så gå tilbake til regnearket, når du skriver inn et nytt nummer i prisen kolonnen eller endre eksisterende priser, vil prisen kolonnen automatisk sortert i stigende rekkefølge.

Merk: når du taster inn et nytt nummer i prisen kolonnen, må du taste inn nummeret på den første tomme cellen under originale tall. Hvis det finnes tomme celler mellom nye oppgitt antall og originale tall samt tomme celler mellom opprinnelige tallene, vil denne kolonnen ikke sorteres automatisk. Anmeldelser