Excel에서 빈 행을 빠르게 삽입하는 방법은 무엇입니까?

우리 대부분은 기존 행 사이에 빈 행을 삽입해야 하는 문제에 직면할 수 있으며, 수동으로 빈 행을 삽입하는 방법을 알고 있습니다. 하지만 각 행을 개별적으로 삽입한다면 수백 개의 빈 행을 추가하는 것은 지루한 작업이 될 것입니다. 여기 이 문제를 해결하는 데 도움이 되는 몇 가지 간단한 방법이 있습니다.

정렬 기능을 사용하여 빈 행 삽입하기
Kutools for Excel로 특정 개수의 빈 행을 빠르게 삽입하기
VBA 코드를 사용하여 번갈아 가며 빈 행 삽입하기

정렬 기능을 사용하여 빈 행 삽입하기

이 방법은 기존 행 사이에 빈 행을 삽입하는 더 쉬운 방법이지만 다소 돌아가는 방법입니다. 다음과 같이 진행할 수 있습니다:

1. 데이터 옆에 빈 열이 필요합니다. 예를 들어 A1:E9 범위가 있는 워크시트가 있다면 F열을 사용할 수 있습니다.

2. F1 셀에 숫자 1을 입력하고, F2 셀에 숫자 2를 입력합니다.

3. 숫자 1과 숫자 2를 선택하고 채우기 핸들을 두 번 클릭하면 Excel이 자동으로 F열의 셀을 채웁니다.

4. 그런 다음 새로 생성된 F열(F1:F9)을 복사하고 F10 셀을 선택한 후 F1:F9의 자동 채우기 번호를 붙여넣습니다. 스크린샷 보기:

5. 그리고 나서 데이터 > 정렬을 클릭하면 정렬 경고 대화 상자가 나타납니다. '선택 영역 확장' 옵션을 선택하고 '정렬'을 클릭하세요. 스크린샷 보기:

6. 그러면 정렬 대화 상자가 나타나며, '정렬 기준' 드롭다운 목록에서 숫자 1 을 선택한 후 확인 버튼을 클릭합니다. 스크린샷 보기:

그러면 기존 행 사이에 새로운 빈 행이 삽입됩니다. 스크린샷 보기:

참고: 각 행 사이에 두 개 또는 세 개의 빈 행을 삽입하려면 새로 자동 채워진 열을 두 번 또는 세 번 복사하여 새 행을 추가할 수 있습니다.

Kutools for Excel로 특정 개수의 빈 행을 빠르게 삽입하기

위의 두 가지 방법은 각 행 사이에 빈 행을 삽입하는 것에 대한 참고 사항이며, 매 n번째 행 이후에 한 개 또는 여러 개의 빈 행을 삽입하려면 어떻게 해야 할까요? 여기에서는 Kutools for Excel의 '빈 행 및 열 삽입' 기능을 추천드립니다. 이 유틸리티는 특정 범위에 대해 매 n번째 행 이후에 특정 개수의 빈 행을 빠르게 삽입하는 데 도움이 됩니다. 아래와 같이 진행해 주세요.

1. 빈 행을 삽입하려는 범위를 선택하고 Kutools > 삽입 > 빈 행 및 열 삽입을 클릭합니다. 스크린샷 보기:

2. '빈 행 및 열 삽입' 대화 상자에서 삽입 유형 섹션에서 ' 빈 행'을 선택하고, 빈 행을 삽입할 간격 행의 숫자와 삽입하려는 행의 숫자를 지정한 후 확인 버튼을 클릭합니다. 스크린샷 보기:

>

그러면 매 두 행마다 특정 개수의 빈 행이 삽입됩니다. 스크린샷 보기:

참고: 간격 및 행의 숫자는 필요에 따라 조정할 수 있습니다. 예를 들어, 매 한, 두, 세 행마다 세, 네, 다섯… 개의 빈 행을 삽입할 수 있습니다.

VBA 코드를 사용하여 번갈아 가며 빈 행 삽입하기

위의 방법이 조금 복잡하다면, 다음 VBA 코드를 사용하여 해결할 수 있습니다.

1. Alt + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 열고, 삽입 > 모듈을 클릭한 후 모듈에 다음 코드를 입력합니다:

VBA 코드: Excel에서 빈 행 삽입하기

Sub InsertBlackRows()
'Updateby20131127
Dim Rng As Range
Dim WorkRng As Range
Dim FirstRow As Integer, xRows As Integer, xCols As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
FirstRow = WorkRng.Row
xRows = WorkRng.Rows.Count
xCols = WorkRng.Columns.Count
Application.ScreenUpdating = False
WorkRng.Cells(xRows, 1).Resize(1, xCols).Select
Do Until Selection.Row = FirstRow
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    Selection.Offset(-1, 0).Select
Loop
Application.ScreenUpdating = True
End Sub

2. 그런 다음 버튼을 클릭하거나 F5 키를 눌러 코드를 실행합니다. 팝업되는 Kutools for Excel 대화 상자에서 빈 행을 삽입할 범위를 선택한 후 확인 버튼을 클릭합니다. 스크린샷 보기:

그러면 매 두 행마다 새로운 빈 행이 삽입됩니다. 스크린샷 보기:

관련 문서

• 매번 다른 열마다 빈 열 삽입하기
• 한 번에 여러 개의 빈 행 또는 열 삽입하기