알파벳순으로 정렬

Question

여러 값을 가진 열이 있는데 알파벳 순으로 정렬하고 싶습니다. 어떻게 정렬합니까? 예 : - 이것이 지금의 모습입니다.

Name          | Code | Status 

Amanda, Bryan, Zoey, Albert, Macro, Johnny | 33  | Active 
Amanda, Bryan, Zoey, Albert, Jeniffer, Mac | 44  | Active 

Answer 1

가장 쉬운 방법은 VBA에서 수행하는 것입니다. VBA를 모듈에 다음 두 함수를 만듭니다

이

Public Function fSort(vValue As String, vDelimiter As String) As String 
    'Take a string, split it into an array based on the delimiter, 
    'sort it and finally convert it back into a string 

    fSort = Join(fSortArray(Split(vValue, vDelimiter)), vDelimiter) 

End Function 

Function fSortArray(vArray As Variant) As Variant 
    'Sort a one dimensional array of string values alphabetically 

    Dim vI As Long, vJ As Long 
    Dim vTmp As String 

    For vI = 0 To UBound(vArray) 
     For vJ = vI To UBound(vArray) 
      If UCase(vArray(vJ)) < UCase(vArray(vI)) Then 
       vTmp = vArray(vI) 
       vArray(vI) = vArray(vJ) 
       vArray(vJ) = vTmp 
      End If 
     Next 
    Next 

    fSortArray = vArray 
End Function 

다음과 같은 셀 수식에 fSort을 사용

=fSort(A3,", ")