Excel에서 셀에 빈 항목이나 누락된 항목을 방지하려면 어떻게 해야 하나요?

워크시트의 A1:B10 범위에 표를 만들고 이 범위에 빈 셀이 남지 않도록 하고 싶다면, 편집 중 빈 항목이 감지되었을 때 자동으로 알림을 표시하는 솔루션을 구현할 수 있습니다. 다음 단계별 가이드를 따라 지정된 표 범위에서 빈 항목이나 누락된 항목을 방지하세요.

VBA 코드를 사용하여 셀에 빈 항목이나 누락된 항목 방지하기

VBA 코드를 사용하여 셀에 빈 항목이나 누락된 항목 방지하기

A1:B10 범위는 아래 스크린샷에 표시된 대로 A1과 B1이 표 헤더로 사용되는 표에 할당된 범위입니다. 표를 작성하면서 A2:B10 범위 내에서 빈 항목이나 누락된 항목을 방지하기 위해 아래 단계를 따르세요.

1. 특정 범위에서 빈 항목을 방지하려는 워크시트에서 시트 탭을 마우스 오른쪽 버튼으로 클릭한 다음 마우스 오른쪽 버튼 메뉴에서 보기 코드를 클릭합니다.

2. Microsoft Visual Basic for Applications 창에서 아래 VBA 코드를 복사하여 코드 창에 붙여넣습니다. 스크린샷 참조:

VBA 코드: 셀 범위에서 빈 항목이나 누락된 항목 방지하기

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count <> 1 Then Exit Sub
    Dim isect As Range
    On Error Resume Next
    Set isect = Application.Intersect(Target, Range("A2:B10"))
    
    If Not (isect Is Nothing) Then
        If Target.Column = 1 Then
            If Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0 Then
                MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
                Target.ClearContents
            End If
        Else
            If (Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0) Or (Len(Target.Value) > 0 And Len(Target.Offset(0, -1).Value) = 0) Then
                MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
                Target.ClearContents
            End If
        
        End If
    End If
End Sub

참고: VBA 코드에서 A2:B10은 비어 있는 셀을 남기고 싶지 않은 범위입니다. 필요에 따라 범위를 변경하세요.

이제부터 지정된 범위에서 빈 셀을 건너뛰고 다음 셀을 채우려고 하면 아래와 같이 Kutools for Excel 대화 상자가 나타납니다.

관련 기사:

• Excel에서 워크시트의 특정 셀에 데이터 입력을 방지하려면 어떻게 해야 하나요?
• Excel에서 여러 워크시트 선택을 방지하려면 어떻게 해야 하나요?
• Excel에서 특정 워크시트가 삭제되는 것을 방지하려면 어떻게 해야 하나요?
• Excel에서 특정 셀 내용이 삭제되는 것을 방지하려면 어떻게 해야 하나요?