Excel 에서 인접 셀이 비어 있지 않을 경우 자동으로 행 번호를 매기는 방법은 무엇인가요？
Excel 에서 채우기 핸들을 사용해 일련의 숫자를 수동으로 생성하는 것은 목록에 일련번호나 인덱스를 만드는 일반적인 방법입니다。 그러나 종종 특정 인접 셀에 데이터가 있는 경우에만 행에 번호를 매기고 싶은 상황이 발생합니다。 예를 들어 목록에서 행 수 설정을 자동으로 생성하되， 인접한 데이터 셀이 비어 있으면 번호 매기를 건너뛰고 싶을 수 있습니다。 더 나아가 데이터가 입력되거나 삭제될 때마다 이러한 번호가 즉시 업데이트되어 수동 개입 없이 항상 최신 상태의 순차 번호를 유지되기를 기대할 수도 있습니다。
인접 셀이 비어 있지 않으면 수식으로 자동 번호 매기기
인접 셀 값에 따라 동적으로 행 번호를 매기려면 Excel 수식을 사용하는 것이 효율적인 방법입니다。 이 방식을 사용하면 인접 셀에 값이 있을 때만 행 수 설정이 표시됩니다。 해당 셀에 데이터를 추가하거나 삭제할 때마다 번호가 자동으로 업데이트되어 일치하게 됩니다。 다음은 활용할 수 있는 실용적인 방법입니다：
1。 번호 매기를 시작할 셀(예： 데이터가)B2부터 시작한다면A2)를 선택하고 다음 수식을 입력하세요：
=IF(B2<>"",COUNTA($B$2:B2),"")2. 다음으로 채우기 핸들을 데이터 옆으로 끌어 이 수식을 다른 행에 적용하세요. 그러면 B 열에 데이터가 있는 행에만 번호가 자동으로 표시되며 조정됩니다。
번호가 예상대로 업데이트되지 않는 문제가 발생하면 수식이 관련된 모든 행에 복사되었는지， 그리고 범위 내에 병합됨나 데이터 유효성 검사 규칙이 간섭하지 않는지 확인하세요。 수식은 정확한 참조에 의존하므로 워크시트 구조 변경 시 작동이 방해받을 수 있습니다。
인접 셀이 비어 있지 않으면 VBA 코드로 자동 번호 매기기
고급 사용자이거나 워크시트 전체에 수식을 적용하고 싶지 않을 경우, 또는 데이터 붙여넣기, 블록 삭제, 잦은 변경에도 번호가 자동으로 업데이트되기를 원한다면 VBA 매크로가 훌륭한 대안입니다. VBA 를 사용하면 수식 없이도 인접 셀이 편집될 때마다 한 열의 행 수 설정를 자동으로 업데이트할 수 있습니다。 이는 데이터 입력 양식， 가져오기 로그， 레이아웃이 자주 변경되는 작업 목록에 이상적입니다。
1.Alt + F11 을 눌러 Visual Basic for Applications 편집기 창을 엽니다。 프로젝트 탐색기에서 워크북을 찾은 후 “Microsoft Excel Objects” 아래 해당 워크시트(예： “Sheet1”)를 두 번 클릭합니다。
2. 나타나는 코드 창에 다음 코드를 붙여넣습니다. 이 예제는 B 열이 비어 있지 않을 경우 A 열에 행 번호를 매기도록 설정되어 있으나， 필요에 따라 특정 범위의 참조를 조정할 수 있습니다：
Private Sub Worksheet_Change(ByVal Target As Range)
Dim chk As Range
Set chk = Intersect(Target, Me.Columns("B"))
If chk Is Nothing Then Exit Sub
Application.EnableEvents = False
Call RenumberNonBlank(Me, "B", "A", 2)
Application.EnableEvents = True
End Sub
Sub RenumberNonBlank(ws As Worksheet, _
keyCol As String, _
numCol As String, _
firstDataRow As Long)
Dim lastRow As Long
Dim r As Long
Dim seq As Long
lastRow = ws.Cells(ws.Rows.Count, keyCol).End(xlUp).Row
seq = 1
For r = firstDataRow To lastRow
With ws
If Trim(.Cells(r, keyCol).Value) <> "" Then
.Cells(r, numCol).Value = seq
seq = seq + 1
Else
.Cells(r, numCol).ClearContents
End If
End With
Next r
End Sub
3. VBA 편집기를 저장하고 닫기합니다. 이제 B 열에 콘텐츠를 추가, 편집 또는 지울 때마다 A 열이 즉시 재번호 매기되어 데이터 존재 여부를 반영합니다. B 열에서 항목을 추가하거나 제거할 때마다 순차 번호가 위아래로 자동 조정됩니다。
주의사항 및 유의점:이 매크로는 셀 편집에 반응하도록 원하는 워크시트 코드 창(모듈이나 ThisWorkbook 이 아닌)에 반드시 배치해야 합니다. 또한 코드가 정상적으로 작동하려면 Excel 설정에서 매크로가 활성화되어 있어야 합니다. 만약 「데이터 범위」이 A 열과 B 열 외 다른 열로 변경되었다면 다음 코드의Set chk = Intersect(Target, Me.Columns("B"))및Call RenumberNonBlank(Me, "B", "A", 2)참조를 해당 열로 수정하세요。
문제 해결： 번호 매기가 업데이트되지 않으면 올바른 워크시트를 편집 중인지， 코드가 해당 워크시트 코드 창에 정확히 배치되었는지 다시 확인하세요。 또한 워크북을 매크로 사용 파일(。xlsm)로 저장했는지도 확인해야 합니다。 예기치 않은 오류가 발생하면 헤더 행의 병합됨 또는 데이터와 같이 워크시트 구조를 변경하지 않았는지도 재확인하세요。
최고의 Office 생산성 도구
| 🤖 | KUTOOLS AI 도우미： 다음을 기반으로 데이터 분석 혁신하기：지능형 실행 | 코드 생성| 사용자 지정 수식 생성 | 데이터 분석 및 차트 생성| 향상된 함수 호출… |
| 인기 기능:찾기， 강조 표시 또는 중복 표시 | 빈 행 삭제 | 데이터 손실 없이 열 결합 또는 셀 제거 | 공식을 사용하지 않는 반올림... | |
| 슈퍼 LOOKUP:다중 조건 VLookup | 다중 값 VLookup | 여러 시트에서 VLookup | 퍼지 매치.... | |
| 고급 드롭다운 목록:드롭다운 목록 빠르게 생성 | 종속형 드롭다운 목록 | 다중 선택 드롭다운 목록.... | |
| 열 관리자:특정 수의 열 추가|열 이동|숨겨진 열의 표시 상태 전환|범위 및 열 비교... | |
| 주요 기능:그리드 포커스 | 디자인 보기 |향상된 수식 표시줄 | 워크북 및 시트 관리자 | 자원 라이브러리(자동 텍스트)| 날짜 선택기 | 워크시트 병합 | 암호화/셀 해독 | 목록으로 이메일 보내기 | 슈퍼 필터 | 특수 필터(굵은 글꼴이 있는 셀 필터링/기울임꼴/취소선。。。) 。。。 | |
| 상위 15 도구 모음:12 텍스트도구(텍스트 추가,특정 문자 삭제, ...)| 50+차트유형(간트 차트, ...)| 40+ 실용적인수식(생일을 기준으로 나이 계산, ...)| 19 삽입도구(QR 코드 삽입,경로에서 그림 삽입, ...)| 12 변환도구(단어로 변환하기,환율 변환, ...)| 7 병합 및 분할도구(고급 행 병합,셀 분할, ...)|그 외 더 많은 기능 |
Kutools for Excel 로 Excel 역량을 한 단계 업그레이드하고 전례 없는 효율성을 경험하세요。Kutools for Excel 는 생산성과 저장 시간을 향상시키는 300 개 이상의 고급 기능을 제공합니다。가장 필요한 기능을 지금 바로 확인하세요。。。
Office Tab 가 Office 에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만들어 줍니다
- Word, Excel, PowerPoint 에서 탭 기반 편집 및 읽기 기능을 활성화합니다, Publisher, Access, Visio 및 Project 에서도 사용 가능합니다。
- 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 생성할 수 있습니다。
- 50% 만큼 생산성을 높이고 매일 수백 번의 마우스 클릭을 줄여줍니다！
모든 Kutools 애드인。 하나의 설치 프로그램
Kutools for Office스위트 번들은 Excel, Word, Outlook 및 PowerPoint 용 애드인과 Office Tab Pro 를 포함하며， 다양한 Office 앱을 사용하는 팀에 이상적입니다。
- 올인원 스위트— Excel， Word， Outlook 및 PowerPoint 애드인 + Office Tab Pro
- 하나의 설치 프로그램， 하나의 라이선스— 몇 분 안에 설정 완료(MSI 지원)
- 함께 사용할수록 더 효과적입니다— Office 앱 전반에서 생산성 향상
- 30 일간 모든 기능 무료 체험— 등록이나 신용카드 필요 없음
- 최고의 가성비— 개별 애드인 구매 대비 절약