Excel에서 행을 여러 번 복사하고 삽입하거나 행을 x번 복제하는 방법은 무엇입니까?

일상적인 업무에서 현재 데이터 행 아래에 한 행 또는 각 행을 여러 번 복사하고 삽입해 본 적이 있습니까? 예를 들어, 셀 범위가 있을 때 각 행을 복사하여 다음 행에 3번 붙여넣으려고 합니다(아래 스크린샷 참조). Excel에서 이 작업을 어떻게 처리할 수 있을까요?

• VBA 코드를 사용하여 특정 행을 여러 번 복사하고 삽입하기
• VBA 코드를 사용하여 각 행을 여러 번 복사하고 삽입하기
• 특정 숫자를 기준으로 각 행을 여러 번 복사하고 삽입하기 위한 뛰어난 기능 활용

VBA 코드를 사용하여 특정 행을 여러 번 복사하고 삽입하기

특정 하나의 행만 x번 복제하려는 경우 다음 VBA 코드가 도움이 될 수 있습니다. 아래 단계를 따라 주세요:

1. 여러 번 복사하고 삽입하려는 행을 지정한 후 ALT + F11 키를 누르면 Microsoft Visual Basic for Applications 창이 열립니다.

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

VBA 코드: 특정 하나의 행을 여러 번 복제하기:

Sub test()
'Updateby Extendoffice
    Dim xCount As Integer
LableNumber:
    xCount = Application.InputBox("Number of Rows", "Kutools for Excel", , , , , , 1)
    If xCount < 1 Then
        MsgBox "the entered number of rows is error, please enter again", vbInformation, "Kutools for Excel"
        GoTo LableNumber
    End If
    ActiveCell.EntireRow.Copy
    Range(ActiveCell.Offset(1, 0), ActiveCell.Offset(xCount, 0)).EntireRow.Insert Shift:=xlDown
    Application.CutCopyMode = False
End Sub

3. 코드를 붙여넣은 후 F5 키를 눌러 코드를 실행하면, 복제하려는 횟수를 입력하라는 메시지 상자가 나타납니다(아래 스크린샷 참조):

4. 그런 다음 확인 버튼을 클릭하면 선택된 행 아래에 세 개의 새로운 복사된 행이 삽입됩니다(아래 스크린샷 참조):

VBA 코드를 사용하여 각 행을 여러 번 복사하고 삽입하기

범위 내 각 행을 여러 번 복제하려면 다음 VBA 코드를 적용하세요. 아래 단계를 따르세요:

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

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

VBA 코드: 각 행을 여러 번 복제하기:

Sub insertrows()
'Updateby Extendoffice
Dim I As Long
Dim xCount As Integer
LableNumber:
xCount = Application.InputBox("Number of Rows", "Kutools for Excel", , , , , , 1)
If xCount < 1 Then
MsgBox "the entered number of rows is error ,please enter again", vbInformation, "Kutools for Excel"
GoTo LableNumber
End If
For I = Range("A" & Rows.CountLarge).End(xlUp).Row To 2 Step -1
Rows(I).Copy
Rows(I).Resize(xCount).Insert
Next
Application.CutCopyMode = False
End Sub

3. 그런 다음 F5 키를 눌러 코드를 실행하면 각 레코드를 복제하려는 횟수를 입력하라는 메시지 상자가 나타납니다(아래 스크린샷 참조):

4. 그런 다음 확인 버튼을 클릭하면 활성화된 행 아래에 각 행이 3번 복사되고 삽입됩니다(아래 스크린샷 참조):

특정 숫자를 기준으로 각 행을 여러 번 복사하고 삽입하기 위한 뛰어난 기능 활용

VBA 코드에 익숙하지 않거나 코드가 데이터를 손상시킬까 걱정된다면 여기 유용한 기능인 Kutools for Excel의 '지정된 데이터에 따라 행/열 복사 또는 삽입' 기능을 소개합니다. 이 유틸리티를 사용하면 지정한 숫자에 따라 행을 빠르게 복사하고 삽입할 수 있습니다.

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

1. 데이터 옆의 셀 목록에 복제하려는 반복 횟수를 입력하세요(아래 스크린샷 참조):

2. Kutools > Insert > Duplicate Rows / Columns based on cell value를 클릭하세요(아래 스크린샷 참조):

3. '행 및 열 복사 및 삽입' 대화 상자에서 Type 섹션에서 '행 복사 및 삽입' 옵션을 선택하고 복제하려는 데이터 범위를 선택한 다음 행을 복제할 반복 횟수를 지정하세요(아래 스크린샷 참조):

4. 그런 다음 Ok 또는 Apply 버튼을 클릭하면 필요한 결과를 얻을 수 있습니다:

지금 바로 Kutools for Excel을 다운로드하고 무료로 사용해 보세요!