Excel 에서 누락된 연속 번호에 대해 숫자나 행을 어떻게 삽입하나요？

워크시트에 연속된 숫자 목록이 있지만 일부 숫자가 누락되어 있고, 이제 누락된 숫자나 빈 행을 삽입하여 시퀀스를 완전하게 만들어야 한다고 가정해 보겠습니다(다음 스크린샷 참조). Excel 에서 이 문제를 빠르게 해결하려면 어떻게 해야 할까요？

정렬 및 중복 제거 기능으로 시퀀스에 누락된 숫자 삽입 누락된 숫자 또는 빈 행를 Kutools for Excel 으로 시퀀스에 삽입 VBA 코드로 시퀀스에 누락된 숫자 삽입 VBA 코드로 누락된 시퀀스에 빈 행 삽입

정렬 및 중복 제거 기능으로 시퀀스에 누락된 숫자 삽입

누락된 숫자를 하나씩 찾아서 수동으로 삽입할 수도 있지만, 연속 번호가 수백 개라면 누락된 위치를 식별하기 어렵습니다. Excel 에서는 정렬 및 중복 제거 기능을 사용하여 이 작업을 처리할 수 있습니다。

1. 시퀀스 목록 끝부분에 2005023001 부터 2005023011 까지 다른 연속하는 숫자을 채우세요。 스크린샷 참조：

2。 그런 다음 두 연속하는 숫자의 범위를 선택하고데이터>오름차순을 클릭하세요。 스크린샷 참조：

3。 그러면 데이터 선택가 다음 스크린샷과 같이 정렬됩니다：

4。 그런 다음 중복 항목을 제거해야 합니다。데이터>중복 제거을 클릭하고， 나타난중복 제거대화 상자에서 중복을 제거하려는열이름을 선택하세요。 스크린샷 참조：

5。 그런 다음확인을 클릭하면A 열의 중복 항목이 삭제되고 시퀀스 목록의 누락된 숫자가 삽입됩니다。 스크린샷 참조：

Kutools for Excel 으로 시퀀스에 누락된 숫자 또는 빈 행 삽입

여기서 쉽고 편리한 도구인Kutools for Excel를 소개합니다。 이 도구의누락된 시퀀스 찾기기능을 사용하면 기존 데이터 시퀀스 사이에 누락된 시퀀스 번호 또는 빈 행을 빠르게 삽입할 수 있습니다。

Kutools for Excel 을 이미 설치하셨다면다음과 같이 진행하세요：

1。 누락된 숫자를 삽입하려는 데이터 시퀀스를 선택하세요。

2.Kutools>삽입>누락된 시퀀스 찾기을 클릭하세요。 스크린샷 참조：

3.누락된 시퀀스 찾기대화 상자에서누락된 데이터 삽입을 선택하여 누락된 숫자를 삽입하거나， 누락된 연속하는 숫자을 발견했을 때 빈 행을 삽입하도록 선택하세요。 필요에 따라 빈 행을 삽입할 수도 있습니다。 스크린샷 참조：nserting 빈 행 when encountering missing 연속하는 숫자to insert 빈 행 as you need。 See screenshot：

4。 그런 다음확인버튼을 클릭하면 누락된 연속하는 숫자 또는 빈 행이 데이터에 삽입됩니다。 스크린샷 참조：

Kutools for Excel 지금 다운로드하고 무료 체험하세요！

VBA 코드로 시퀀스에 누락된 숫자 삽입

위의 방법들이 너무 많은 단계를 포함한다고 느끼신다면， VBA 코드를 사용해서도 이 문제를 해결할 수 있습니다。 다음과 같이 진행하세요：

1.ALT + F11키를 누른 상태로 유지하면Microsoft Visual Basic for Applications창이 열립니다。

2.삽입>모듈을 클릭하고， 다음 코드를모듈창에 붙여넣으세요。

VBA： 시퀀스에 누락된 숫자 삽입

Sub InsertValueBetween()
'Updateby Extendoffice
Dim WorkRng As Range
Dim Rng As Range
Dim outArr As Variant
Dim dic As Variant
Set dic = CreateObject("Scripting.Dictionary")
'On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
num1 = WorkRng.Range("A1").Value
num2 = WorkRng.Range("A" & WorkRng.Rows.Count).Value
interval = num2 - num1
ReDim outArr(1 To interval + 1, 1 To 2)
For Each Rng In WorkRng
    dic(Rng.Value) = Rng.Offset(0, 1).Value
Next
For i = 0 To interval
    outArr(i + 1, 1) = i + num1
    If dic.Exists(i + num1) Then
        outArr(i + 1, 2) = dic(i + num1)
    Else
        outArr(i + 1, 2) = ""
    End If
Next
With WorkRng.Range("A1").Resize(UBound(outArr, 1), UBound(outArr, 2))
    .Value = outArr
    .Select
End With
End Sub

3。 그런 다음F5키를 눌러 이 코드를 실행하면 프롬프트 상자가 나타납니다。 누락된 숫자를 삽입하려는 데이터 범위을 선택하세요(범위 제목은 선택하지 마세요)。 스크린샷 참조：

4。 그런 다음확인을 클릭하면 누락된 숫자가 시퀀스 목록에 삽입됩니다。 스크린샷 참조：

VBA 코드로 누락된 시퀀스에 빈 행 삽입

때로는 누락된 숫자의 위치만 파악하고 데이터 사이에 빈 행을 삽입하여 필요한 정보를 입력해야 할 수도 있습니다。 물론 다음 VBA 코드도 이 문제를 해결하는 데 도움이 됩니다。

1.ALT + F11키를 누른 상태로 유지하면Microsoft Visual Basic for Applications창이 열립니다。

2.삽입>모듈을 클릭하고， 다음 코드를모듈창에 붙여넣으세요。

VBA： 누락된 시퀀스에 빈 행 삽입

Sub InsertNullBetween()
'Updateby Extendoffice
Dim WorkRng As Range
Dim Rng As Range
Dim outArr As Variant
Dim dic As Variant
Set dic = CreateObject("Scripting.Dictionary")
'On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
num1 = WorkRng.Range("A1").Value
num2 = WorkRng.Range("A" & WorkRng.Rows.Count).Value
interval = num2 - num1
ReDim outArr(1 To interval + 1, 1 To 2)
For Each Rng In WorkRng
    dic(Rng.Value) = Rng.Offset(0, 1).Value
Next
For i = 0 To interval
    If dic.Exists(i + num1) Then
        outArr(i + 1, 1) = i + num1
        outArr(i + 1, 2) = dic(i + num1)
    Else
        outArr(i + 1, 1) = ""
        outArr(i + 1, 2) = ""
    End If
Next
With WorkRng.Range("A1").Resize(UBound(outArr, 1), UBound(outArr, 2))
    .Value = outArr
    .Select
End With
End Sub

3。 그런 다음F5키를 눌러 이 코드를 실행하면 프롬프트 상자가 표시됩니다。 누락된 시퀀스에 빈 행을 삽입하려는 데이터 범위을 선택하세요(범위 제목은 선택하지 마세요)。 스크린샷 참조：

4。 그런 다음확인을 클릭하면 누락된 시퀀스 목록에 빈 행이 삽입됩니다。 스크린샷 참조：

관련 문서：

Excel 에서 누락된 숫자 시퀀스를 어떻게 식별하나요？

최고의 Office 생산성 도구

🤖	KUTOOLS AI 도우미： 다음을 기반으로 데이터 분석 혁신하기：지능형 실행   |  코드 생성|  사용자 지정 수식 생성  |  데이터 분석 및 차트 생성|  향상된 함수 호출…
	인기 기능:찾기， 강조 표시 또는 중복 표시   |  빈 행 삭제   |  데이터 손실 없이 열 결합 또는 셀 제거   |  공식을 사용하지 않는 반올림...
	슈퍼 LOOKUP:다중 조건 VLookup  |  다중 값 VLookup  |   여러 시트에서 VLookup   |   퍼지 매치....
	고급 드롭다운 목록:드롭다운 목록 빠르게 생성   |  종속형 드롭다운 목록   |  다중 선택 드롭다운 목록....
	열 관리자:특정 수의 열 추가|열 이동|숨겨진 열의 표시 상태 전환|범위 및 열 비교...
	주요 기능:그리드 포커스   |  디자인 보기   |향상된 수식 표시줄   | 워크북 및 시트 관리자   |  자원 라이브러리(자동 텍스트)|  날짜 선택기   |  워크시트 병합  |  암호화/셀 해독   | 목록으로 이메일 보내기   |  슈퍼 필터   |   특수 필터(굵은 글꼴이 있는 셀 필터링/기울임꼴/취소선。。。) 。。。
	상위 15 도구 모음:12 텍스트도구(텍스트 추가,특정 문자 삭제, ...)|   50+차트유형(간트 차트, ...)|   40+ 실용적인수식(생일을 기준으로 나이 계산, ...)|   19 삽입도구(QR 코드 삽입,경로에서 그림 삽입, ...)|   12 변환도구(단어로 변환하기,환율 변환, ...)|   7 병합 및 분할도구(고급 행 병합,셀 분할, ...)|그 외 더 많은 기능

Kutools 를 선호하는 언어로 사용하세요 – 영어， 스페인어， 독일어， 프랑스어， 중국어 및 40+개 이상의 언어를 지원합니다！

Kutools for Excel 로 Excel 역량을 한 단계 업그레이드하고 전례 없는 효율성을 경험하세요。Kutools for Excel 는 생산성과 저장 시간을 향상시키는 300 개 이상의 고급 기능을 제공합니다。가장 필요한 기능을 지금 바로 확인하세요。。。

Kutools for Excel 에 대한 자세한 정보。。。무료 다운로드。。。

---

Office Tab 가 Office 에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만들어 줍니다

• Word, Excel, PowerPoint 에서 탭 기반 편집 및 읽기 기능을 활성화합니다, Publisher, Access, Visio 및 Project 에서도 사용 가능합니다。
• 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 생성할 수 있습니다。
• 50% 만큼 생산성을 높이고 매일 수백 번의 마우스 클릭을 줄여줍니다！

Office Tab 에 대한 자세한 정보。。。무료 다운로드。。。

---

모든 Kutools 애드인。 하나의 설치 프로그램

Kutools for Office스위트 번들은 Excel, Word, Outlook 및 PowerPoint 용 애드인과 Office Tab Pro 를 포함하며， 다양한 Office 앱을 사용하는 팀에 이상적입니다。

• 올인원 스위트— Excel， Word， Outlook 및 PowerPoint 애드인 + Office Tab Pro
• 하나의 설치 프로그램， 하나의 라이선스— 몇 분 안에 설정 완료(MSI 지원)
• 함께 사용할수록 더 효과적입니다— Office 앱 전반에서 생산성 향상
• 30 일간 모든 기능 무료 체험— 등록이나 신용카드 필요 없음
• 최고의 가성비— 개별 애드인 구매 대비 절약

Kutools for Office 에 대한 자세한 정보。。。무료 다운로드。。。