Excel에서 값별로 열을 자동 정렬하는 방법은 무엇입니까?

예를 들어 아래 스크린샷과 같은 구매 테이블이 있습니다. 이제 이 열에 새 숫자/가격을 입력할 때 가격 열이 자동으로 정렬되기를 원합니다. 어떻게 해결할 수 있습니까? 여기에서는 Excel에서 특정 열을 값으로 자동 정렬하는 데 도움이 되는 VBA 매크로를 소개합니다.

VBA를 사용하여 값별로 열 자동 정렬

VBA를 사용하여 값별로 열 자동 정렬

이 VBA 매크로는 Excel의 열에 새 데이터를 입력하거나 값을 변경하는 즉시 특정 열의 모든 데이터를 자동으로 정렬합니다.

1. 현재 시트 이름을 마우스 오른쪽 버튼으로 클릭합니다. 시트 탭 모음를 클릭 한 다음 코드보기 오른쪽 클릭 메뉴에서.

2. Microsoft Visual Basic for Application 열기 대화 상자에서 다음 VBA 매크로 코드를 열기 창에 붙여 넣습니다.

VBA : 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

주의 사항:
1) 위의 vba 코드에서 B : B 열 B가 자동으로 정렬된다는 의미입니다. B1 B열의 첫 번째 셀입니다. B2 B열의 두 번째 셀이며 필요에 따라 변경할 수 있습니다.
2) 스니펫 헤더:=xl예 다섯 번째 행에서 Excel에 정렬할 범위에 머리글이 있음을 알려주므로 정렬할 때 범위의 첫 번째 행이 포함되지 않습니다. 헤더가 없으면 다음으로 변경하십시오. 헤더:=xl아니요; 그리고 변화 키1:=범위("B2") 4번째 줄에 키1:=범위("B1").

3. 그런 다음 워크 시트로 돌아가서 가격 열에 새 숫자를 입력하거나 기존 가격을 수정하면 가격 열이 자동으로 오름차순으로 정렬됩니다.

주의 사항: 가격 열에 새 숫자를 입력할 때 원래 숫자 아래의 첫 번째 빈 셀에 숫자를 입력해야 합니다. 새로 입력한 번호와 원래 번호 사이에 빈 셀이 있고 원래 번호 사이에 빈 셀이 있는 경우 이 열은 자동으로 정렬되지 않습니다.

데모 : Excel에서 VBA를 사용하여 값별로 열 자동 정렬