일반적으로 텍스트를 열로 기능을 사용하여 쉼표, 점, 세미콜론, 슬래시 등과 같은 특정 구분 기호로 셀 내용을 여러 열로 분할할 수 있습니다. 그러나 경우에 따라 구분된 셀 내용을 여러 행으로 분할해야 할 수도 있습니다. 아래 표시된 스크린샷과 같이 다른 열의 데이터를 반복합니다. Excel에서 이 작업을 처리할 수 있는 좋은 방법이 있습니까? 이 자습서에서는 Excel에서 이 작업을 완료하는 몇 가지 효과적인 방법을 소개합니다.

비디오: 구분 기호로 텍스트 문자열을 여러 행으로 분할

방법 A: VBA 코드로 구분된 텍스트를 여러 행으로 분할

이 섹션에서는 특정 구분 기호로 구분된 셀 내용을 분할하는 데 도움이 되는 두 개의 VBA 코드를 소개합니다.

쉼표, 공백, 세미콜론 등으로 구분된 텍스트 분할

쉼표, 공백, 세미콜론, 슬래시 등과 같은 일반 구분 기호로 구분되는 텍스트 문자열을 분할하려면 다음 코드를 사용하면 됩니다. 다음 단계를 따르십시오.

 주의 사항: 이 코드 하지 않습니다 SUPPORT 취소, 이 코드를 적용하기 전에 데이터를 백업하는 것이 좋습니다.

1단계: VBA 모듈 편집기를 열고 코드를 복사합니다.

1. 사용하려는 시트를 활성화합니다. 그런 다음 Alt + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

2. 열린 창에서 클릭 끼워 넣다 > 모듈 새 빈 모듈을 만듭니다.

3. 그런 다음 아래 코드를 복사하여 빈 모듈에 붙여넣습니다.

VBA 코드: 특정 구분 기호(쉼표, 점, 공백 등)로 텍스트 분할

Sub SplitTextIntoRows()
'UpdatebyExtendoffice
    Dim xSRg, xIptRg, xCrRg, xRg As Range
    Dim xSplitChar As String
    Dim xArr As Variant
    Dim xFNum, xFFNum, xRow, xColumn, xNum As Integer
    Dim xWSh As Worksheet
    Set xSRg = Application.InputBox("Select a range:", "Kutools for Excel", , , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    xSplitChar = Application.InputBox("Type delimiter:", "Kutools for Excel", , , , , , 2)
    If xSplitChar = "" Then Exit Sub
    Application.ScreenUpdating = False
    xRow = xSRg.Row
    xColumn = xSRg.Column
    Set xWSh = xSRg.Worksheet
    For xFNum = xSRg.Rows.Count To 1 Step -1
        Set xRg = xWSh.Cells.Item(xRow + xFNum - 1, xColumn)
        xArr = Split(xRg, xSplitChar)
        xIndex = UBound(xArr)
        For xFFNum = LBound(xArr) To UBound(xArr)
            xRg.EntireRow.Copy
            xRg.Offset(1, 0).EntireRow.Insert Shift:=xlShiftDown
            xRg.Worksheet.Cells(xRow + xFNum, xColumn) = xArr(xIndex)
            xIndex = xIndex - 1
        Next
        xRg.EntireRow.Delete
    Next
    Application.CutCopyMode = False
    Application.ScreenUpdating = True
End Sub   

2단계: 코드를 실행하여 결과 얻기

1. 코드 붙여넣기 후 눌러주세요 F5 이 코드를 실행하는 키입니다. 그런 다음 분할하려는 구분된 텍스트가 포함된 셀을 선택하라는 프롬프트 상자가 나타납니다. 스크린샷을 참조하세요.

2. 그런 다음 OK, 데이터를 분할할 구분 기호를 입력하라는 메시지를 표시하는 또 다른 프롬프트 상자가 나타납니다. 여기에 쉼표와 공백(,)을 입력합니다. 스크린샷을 참조하세요.

3. 마지막으로 OK 단추. 이제 선택한 텍스트 문자열이 쉼표를 기준으로 행으로 분할되고 다른 관련 열 데이터가 아래 표시된 스크린샷과 같이 반복되는 것을 볼 수 있습니다.

줄 바꿈으로 구분된 텍스트 분할

셀 내용이 줄 바꿈으로 구분되어 여러 행으로 분할되는 경우 여기에 도움이 될 수 있는 또 다른 VBA 코드가 있습니다.

 주의 사항: 이 코드 하지 않습니다 SUPPORT 취소 이 코드를 적용하기 전에 데이터를 백업하는 것이 좋습니다.

1단계: VBA 모듈 편집기를 열고 코드를 복사합니다.

1. 프레스 Alt + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

2. 열린 창에서 클릭 끼워 넣다 > 모듈 새 빈 모듈을 만듭니다.

3. 그런 다음 아래 코드를 복사하여 빈 모듈에 붙여넣습니다.

VBA 코드: 줄 바꿈으로 텍스트 분할

Sub SplitTextIntoRows()
'UpdatebyExtendoffice
    Dim xSRg, xIptRg, xCrRg, xRg As Range
    Dim xSplitChar As String
    Dim xArr As Variant
    Dim xFNum, xFFNum, xRow, xColumn, xNum As Integer
    Dim xWSh As Worksheet
    Set xSRg = Application.InputBox("Select a range:", "Kutools for Excel", , , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    xSplitChar = Chr(10)
    Application.ScreenUpdating = False
    xRow = xSRg.Row
    xColumn = xSRg.Column
    Set xWSh = xSRg.Worksheet
    For xFNum = xSRg.Rows.Count To 1 Step -1
        Set xRg = xWSh.Cells.Item(xRow + xFNum - 1, xColumn)
        xArr = Split(xRg, xSplitChar)
        xIndex = UBound(xArr)
        For xFFNum = LBound(xArr) To UBound(xArr)
            xRg.EntireRow.Copy
            xRg.Offset(1, 0).EntireRow.Insert Shift:=xlShiftDown
            xRg.Worksheet.Cells(xRow + xFNum, xColumn) = xArr(xIndex)
            xIndex = xIndex - 1
        Next
        xRg.EntireRow.Delete
    Next
    Application.CutCopyMode = False
    Application.ScreenUpdating = True
End Sub 

2단계: 코드를 실행하여 결과 얻기

1. 코드 붙여넣기 후 눌러주세요 F5 이 코드를 실행하는 키입니다. 튀어나온 상자에서 분할하려는 셀을 선택하십시오. 스크린샷을 참조하십시오.

2. 그런 다음 OK 버튼을 클릭하면 선택한 셀의 데이터가 아래 표시된 스크린샷과 같이 행으로 분할됩니다.

방법 B: Excel용 Kutools로 구분된 텍스트를 여러 행으로 분할하는 10초

설치 한 경우 Excel 용 Kutools그와 데이터를 행으로 분할 기능을 사용하면 지정한 구분 기호로 텍스트 문자열을 여러 행으로 분할할 수 있습니다. 다음 단계를 따르십시오.

1단계: 데이터를 행으로 분할 기능 선택

쿠툴 > 병합 및 분할 > 데이터를 행으로 분할, 스크린 샷 참조 :

2단계: 분할을 위한 데이터 셀 및 구분 기호 지정

튀어나온 대화 상자에서 다음 옵션을 사용합니다.

• 1). 분할하려는 셀 목록을 선택하십시오. 범위(단일 열) 텍스트 상자;
• 2). 그런 다음 데이터를 구분하는 구분 기호를 선택합니다. 여기에서 선택하겠습니다. 기타 텍스트 상자에 쉼표와 공백(,)을 입력합니다.
• 삼). 마지막으로 클릭 OK 버튼을 클릭합니다.

이제 구분된 텍스트 문자열이 있는 선택된 셀이 특정 구분 기호에 따라 여러 행으로 변환되었습니다. 스크린샷을 참조하세요.

 방문 꿀팁: 원본 데이터를 복원하려면 Ctrl + Z 실행 취소를 위해.

사용하기 쉬운? 이 기능에 관심이 있으시면 30일 동안 무료 평가판을 받으려면 클릭하여 다운로드.

방법 C: 구분된 텍스트를 여러 행으로 분할 Power Query

Office 365 또는 Excel 2016 이상 버전을 실행 중인 경우, Power Query 는 구분된 텍스트를 여러 행이나 열로 분할하는 데 도움이 되는 강력한 도구입니다. 원본 데이터가 변경될 때 분할 데이터를 새로 고치려는 경우에 유용합니다. 완료하려면 다음 단계를 수행하십시오.

1단계: 데이터 테이블 가져오기 Power Query

1. 사용하려는 데이터 범위를 선택한 다음 클릭 Data > 테이블에서, 스크린 샷 참조 :

 방문 꿀팁: Excel 2019 및 Office 365에서 클릭 Data > 테이블/레인지에서.

2. 튀어나온 부분 표 만들기 대화 상자에서 OK 테이블을 생성하는 버튼은 스크린샷을 참조하십시오.

3. 자, Power Query 편집자 창이 데이터와 함께 표시됩니다. 스크린샷 참조:

2단계: 변환 수행 Power Query

1. 분할할 열을 선택합니다. 그런 다음 홈 > 열 분할 > 구분자별, 스크린 샷 참조 :

2. 에서 구분 기호로 열 분할 대화 상자 :

쉼표, 공백, 세미콜론 등으로 텍스트 문자열을 분할하려면 다음과 같이 하십시오.

• 1). 데이터를 구분하는 구분 기호를 선택하십시오. 구분 기호 선택 또는 입력 드롭 다운 목록;
• 2). 고르다 구분 기호가 나타날 때마다 인사말 분할 섹션;
• 삼). 그런 다음 고급 옵션 섹션을 확장하고 선택하려면 행 아래 로 분할;
• 삼). 마지막으로 클릭 OK 이 대화 상자를 닫으십시오.

링크 나누기로 텍스트 문자열을 여러 행으로 분할하려면 다음과 같이 하십시오.

• 삼). 고르다 관습 인사말 구분 기호 선택 또는 입력 드롭 다운 목록;
• 2). 로부터 특수 문자 삽입 드롭다운, 클릭 줄 바꿈, 및 문자 #(lf) 아래의 텍스트 상자에 삽입됩니다. 관습 자동으로;
• 3). 고르다 구분 기호가 나타날 때마다 분할 위치 섹션에서;
• 삼). 그런 다음 고급 옵션 섹션을 확장하고 선택하려면 행 아래 로 분할;
• 삼). 마지막으로 클릭 OK 이 대화 상자를 닫으십시오.

3. 이제 선택한 데이터가 아래 스크린샷과 같이 여러 행으로 분할되었습니다.

3단계: 출력 Power Query Excel 테이블로

1. 그런 다음 데이터를 워크시트에 출력해야 합니다. 클릭하세요 홈 > 닫기 및로드 > 닫기 및로드 / 닫기 및로드, (여기서 닫기 및로드), 스크린 샷 참조 :

 방문 꿀팁: 클릭 닫기 및로드 데이터를 새 워크시트에 출력합니다. 딸깍 하는 소리 닫기 및로드 옵션을 선택하면 데이터가 필요한 다른 시트로 출력됩니다.

2. 마지막으로 데이터가 새 워크시트에 로드됩니다(스크린샷 참조).

 방문 꿀팁: 원본 테이블의 데이터를 자주 업데이트해야 하는 경우 걱정하지 마십시오. 결과 테이블을 마우스 오른쪽 단추로 클릭하고 새로 고침 새로운 결과를 동적으로 얻습니다.

관련 기사: