Excel에서 열을 번갈아가며 분할하는 방법은 무엇입니까?

예를 들어, 긴 데이터 목록이 있고 이제 다음과 같은 스크린샷에 표시된 대로 번갈아가며 행마다 열을 두 개의 동일한 목록으로 분할하려고 합니다. Excel에서 이 작업을 처리하기 위한 좋은 방법이 있을까요?

수식을 사용하여 열을 번갈아가며 분할하기

VBA 코드를 사용하여 열을 번갈아가며 분할하기

Kutools for Excel을 사용하여 열을 번갈아가며 분할하기

수식을 사용하여 열을 번갈아가며 분할하기

다음 수식들은 열을 번갈아가며 두 열로 빠르게 분할하는 데 도움이 될 수 있습니다. 아래 단계를 따라 주세요:

1. 예를 들어 C2와 같은 빈 셀에 다음 수식을 입력하세요: =INDEX($A$2:$A$13,ROWS(C$1:C1)*2-1), 스크린샷 참조:

2. 그런 다음 오류가 셀에 표시될 때까지 채우기 핸들을 아래로 드래그하세요. 스크린샷 참조:

3. 그런 다음 D2 셀에 다른 수식을 입력합니다: =INDEX($A$2:$A$13,ROWS(D$1:D1)*2), 그리고 오류 값이 나타날 때까지 채우기 핸들을 아래로 드래그하면 열 값이 번갈아가며 두 열로 분할됩니다. 스크린샷 참조:

VBA 코드를 사용하여 열을 번갈아가며 분할하기

VBA 코드에 관심이 있다면, 여기서 이 문제를 해결하기 위해 여러분께 소개해드릴 코드가 있습니다.

1. Excel에서 ALT + F11 키를 누르면 Microsoft Visual Basic for Applications 창이 열립니다.

2. Insert > Module를 클릭하고 모듈 창에 다음 코드를 붙여넣습니다.

VBA 코드: 열을 번갈아가며 두 열로 분할하기

Sub SplitEveryOther()
'Updateby Extendoffice
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
Dim index As Integer
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set OutRng = OutRng.Range("A1")
num1 = 1
num2 = 1
For index = 1 To InputRng.Rows.Count
    If index Mod 2 = 1 Then
        OutRng.Cells(num1, 1).Value = InputRng.Cells(index, 1)
        num1 = num1 + 1
    Else
        OutRng.Cells(num2, 2).Value = InputRng.Cells(index, 1)
        num2 = num2 + 1
    End If
Next
End Sub	

3. 그런 다음 F5 키를 눌러 이 코드를 실행하면 분할하려는 데이터 범위를 선택하라는 메시지 상자가 나타납니다. 스크린샷 참조:

4. 확인을 클릭하면 결과를 출력할 셀을 선택하라는 또 다른 메시지 상자가 나타납니다. 스크린샷 참조:

5. 확인을 클릭하면 열이 번갈아가며 두 열로 분할됩니다. 스크린샷 참조:

Kutools for Excel을 사용하여 열을 번갈아가며 분할하기

새로운 기능을 배우고 싶다면, 강력한 도구인 Kutools for Excel을 추천드립니다. Transform Range 유틸리티를 사용하면 단일 행 또는 열을 셀 범위로 변환하거나 그 반대로도 빠르게 변환할 수 있습니다.

Kutools for Excel 설치 후에는 다음과 같이 하세요:

1. 번갈아가며 두 열로 분할하려는 열 데이터를 선택하세요.

2. 그런 다음 Kutools > Range > Transform Range를 클릭하세요. 스크린샷 참조:

3. Transform Range 대화 상자에서 Transform type 아래의 Single column to range를 선택하고 Fixed value를 선택한 다음 Rows per record 섹션의 상자에 2를 입력하세요. 스크린샷 참조:

4. 확인 버튼을 클릭하면 결과를 출력할 셀을 선택하라는 메시지 상자가 나타납니다. 스크린샷 참조:

5. 확인을 클릭하면 목록 데이터가 번갈아가며 두 열로 분할됩니다.

Transform Range 유틸리티에 대해 자세히 알아보기 위해 클릭하세요.