Vba: 값을 알파벳순으로 정렬하는 방법

VBA에서 다음 기본 구문을 사용하여 범위의 값을 알파벳순으로 정렬할 수 있습니다.

 Sub SortAlphabetical()
Range(" A1:B11 ").Sort Key1:=Range(" A1 "), Order1:=xlAscending, Header:=xlYes
End Sub

이 특정 예에서는 A열의 값을 기준으로 A1:B11 범위의 행을 알파벳순(A~Z)으로 정렬합니다.

값을 알파벳 역순(Z에서 A)으로 정렬하려면 Order1:=xlDescending을 대신 지정할 수 있습니다.

Header:=xlYes 는 첫 번째 줄이 머리글 줄로 처리되어야 함을 지정합니다.

다음 예에서는 실제로 이 구문을 사용하는 방법을 보여줍니다.

예: VBA를 사용하여 값을 알파벳순으로 정렬

다양한 농구 선수에 대한 정보가 포함된 다음과 같은 데이터 세트가 Excel에 있다고 가정해 보겠습니다.

팀 이름을 기준으로 행을 알파벳순으로 정렬한다고 가정해 보겠습니다.

이를 위해 다음 매크로를 생성할 수 있습니다:

 Sub SortAlphabetical()
Range(" A1:B11 ").Sort Key1:=Range(" A1 "), Order1:=xlAscending, Header:=xlYes
End Sub

이 매크로를 실행하면 다음과 같은 출력이 나타납니다.

이제 행이 팀 이름을 기준으로 알파벳순(A~Z)으로 정렬됩니다.

행을 알파벳 역순(Z에서 A)으로 정렬하려면 Order1:=xlDescending을 지정할 수 있습니다.

 Sub SortAlphabetical()
Range(" A1:B11 ").Sort Key1:=Range(" A1 "), Order1:=xlDescending, Header:=xlYes
End Sub

이 매크로를 실행하면 다음과 같은 출력이 나타납니다.

이제 행이 알파벳 역순(Z에서 A)으로 팀 이름별로 정렬됩니다.

참고 #1 : 이 예에서는 하나의 열을 기준으로 정렬했습니다. 그러나 여러 열을 정렬하기 위해 더 많은 키를 지정할 수 있습니다.

참고 #2 : 여기에서 VBA 정렬 방법에 대한 전체 문서를 찾을 수 있습니다.

추가 리소스

다음 자습서에서는 VBA에서 다른 일반적인 작업을 수행하는 방법을 설명합니다.

VBA: 여러 열을 기준으로 시트를 정렬하는 방법
VBA:범위 내 행 수를 계산하는 방법
VBA: 열을 필터링하는 방법