Excel에서 필터 후 번호를 자동으로 지정하거나 번호를 다시 매기는 방법은 무엇입니까?

우리 모두 알고 있듯이 시리즈 번호 목록이있는 데이터를 필터링하면 워크 시트의 행 번호가 원래 번호와 동일하게 표시되며 자동으로 번호가 다시 매겨지지 않습니다. 그러나 다음 스크린 샷과 같이 필터링 된 워크 시트에서 순서대로 행 번호를 다시 매길 수도 있습니다. 이 기사에서는 Excel에서 필터 후 번호를 자동으로 지정하거나 번호를 다시 매기는 방법에 대해 설명합니다.

VBA 코드로 필터 후 자동 번호 또는 번호 다시 매기기

Excel 용 Kutools로 필터 후 자동 번호 또는 번호 다시 매기기

VBA 코드로 필터 후 자동 번호 또는 번호 다시 매기기

필터링 된 상태에서는 자동 채우기 핸들을 적용하여 숫자 시퀀스를 채울 수 없으며 숫자를 하나씩 입력하여 채울 수 있습니다. 그러나 번호를 다시 매겨 야하는 셀이 많으면 지루하고 시간이 많이 걸립니다. 여기서는이 작업을 해결하기위한 VBA 코드를 소개합니다.

1. 누르고 ALT + F11 키가 열립니다. Microsoft Visual Basic for Applications 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 다음 매크로를 모듈 창.

VBA 코드 : 필터 후 자동 번호 또는 번호 다시 매기기

Sub Renumbering()
	'Updateby Extendoffice
	Dim Rng As Range
	Dim WorkRng As Range
	On Error Resume Next
	xTitleId = "KutoolsforExcel"
	Set WorkRng = Application.Selection
	Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
	Set WorkRng = WorkRng.Columns(1).SpecialCells(xlCellTypeVisible)
	xIndex = 1
	For Each Rng In WorkRng
		Rng.Value = xIndex
		xIndex = xIndex + 1
	Next
End Sub

3. 코드를 붙여 넣은 후 F5 키를 눌러이 코드를 실행하면 자동으로 번호를 매기거나 행 번호를 다시 매길 범위 셀을 선택하라는 메시지 상자가 나타납니다. 스크린 샷을 참조하십시오.

문서 번호 다시 매기기 필터-3

4. 그런 다음 OK, 선택한 범위 셀이 아래 스크린 샷과 같이 순차적으로 번호가 다시 매겨졌습니다.

문서 번호 다시 매기기 필터-3

주의 사항:이 코드는 필터 기능을 취소 할 때 원래 시리즈 행 번호를 파괴합니다. 따라서 먼저 데이터를 백업해야합니다.

Excel 용 Kutools로 필터 후 자동 번호 또는 번호 다시 매기기

설치 한 경우 Excel 용 Kutools, 강력한 시퀀스 번호 삽입 기능을 사용하면 필터링 된 데이터에 시퀀스 번호를 빠르고 쉽게 삽입 할 수 있습니다.

Excel 용 Kutools : 300 개 이상의 편리한 Excel 추가 기능으로 30 일 동안 제한없이 무료로 사용해 볼 수 있습니다..

다운로드로 이동
30 일 무료 평가판 매수
페이팔 / 마이커머스

설치 후 Excel 용 Kutools, 다음과 같이하십시오.

1. 필터링 된 데이터의 번호를 다시 매길 셀을 선택합니다.

2. 그런 다음 쿠툴 > 끼워 넣다 > 시퀀스 번호 삽입, 스크린 샷 참조 :

3. 그런 다음 튀어 나와 시퀀스 번호 삽입 대화 상자에서 신규클래스 버튼, 스크린 샷 참조 :

문서 번호 다시 매기기 필터-3

4. 그런 다음 왼쪽 하단 섹션에서 필요에 따라 시퀀스 목록 번호를 생성합니다 (스크린 샷 참조).

문서 번호 다시 매기기 필터-3

5. 순서를 설정 한 후 추가 버튼을 클릭하고 시퀀스 항목이 대화 상자에 추가되었습니다. 스크린 샷 참조 :

문서 번호 다시 매기기 필터-3

6. 그런 다음 채우기 범위, 필터링 된 데이터는 한 번에 번호가 다시 매겨졌습니다. 스크린 샷보기 :

문서 번호 다시 매기기 필터-3

Excel 용 Kutools를 지금 다운로드하고 무료로 평가하십시오!

데모 : Excel 용 Kutools를 사용하여 필터 후 자동 번호 또는 번호 다시 매기기

Excel 용 Kutools: 300 개 이상의 편리한 Excel 추가 기능으로 30 일 동안 제한없이 무료로 사용해 볼 수 있습니다. 지금 다운로드 및 무료 평가판!

최고의 사무 생산성 도구

Excel용 Kutools는 대부분의 문제를 해결하고 생산성을 80% 증가시킵니다.

재사용: 빠르게 삽입 복잡한 공식, 차트 그리고 이전에 사용한 모든 것; 셀 암호화 암호로; 메일 링리스트 생성 이메일 보내기 ...
슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집 할 수 있습니다.) 레이아웃 읽기 (많은 수의 셀을 쉽게 읽고 편집합니다.) 필터링 된 범위에 붙여 넣기...
셀 / 행 / 열 병합 데이터 손실없이; 셀 내용 분할; 중복 행 / 열 결합... 중복 셀 방지; 범위 비교...
중복 또는 고유 선택 행; 빈 행 선택 (모든 셀이 비어 있음); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 무작위 선택 ...
정확한 사본 수식 참조를 변경하지 않고 여러 셀; 참조 자동 생성 여러 시트에; 글 머리 기호 삽입, 확인란 등 ...
텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 부분합을 만들고 인쇄합니다. 셀 내용과 주석 간 변환...
슈퍼 필터 (다른 시트에 필터 구성표 저장 및 적용) 고급 정렬 월 / 주 / 일, 빈도 등 특수 필터 굵은 기울임 꼴로 ...
통합 문서와 워크 시트 결합; 키 열을 기반으로 테이블 병합; 데이터를 여러 시트로 분할; xls, xlsx 및 PDF 일괄 변환...
300개 이상의 강력한 기능. Office / Excel 2007-2021 및 365를 지원합니다. 모든 언어를 지원합니다. 기업 또는 조직에서 쉽게 배포할 수 있습니다. 전체 기능은 30일 무료 평가판입니다. 60일 환불 보장.