Excel에서 모든 빈 워크시트를 삭제하려면 어떻게 해야 하나요?

여러 워크시트가 포함된 통합 문서가 있고, 그중 일부는 빈 워크시트일 수 있습니다. 이제 파일을 저장하거나 보관하기 위해 이러한 빈 워크시트를 삭제하고 싶습니다. 여러 워크시트 중에서 빈 시트를 찾아 자동으로 삭제하려면 어떻게 해야 할까요?

VBA 코드로 모든 빈 워크시트 삭제하기

Kutools for Excel로 모든 빈 워크시트 삭제하기

VBA 코드로 모든 빈 워크시트 삭제하기

빈 워크시트를 하나씩 확인하고 삭제하는 것은 번거로울 수 있지만, 다음 VBA 코드를 사용하면 한 번에 모든 빈 워크시트를 쉽게 삭제할 수 있습니다.

1. ALT + F11 키를 누르고 있으면 Microsoft Visual Basic for Applications 창이 열립니다.

2. 삽입 > 모듈을 클릭한 후, 모듈 창에 다음 코드를 붙여넣습니다.

VBA: 모든 빈 워크시트 삭제

Sub DeleteBlankWorksheets()
'Update 20130830
Dim Ws As Worksheet
On Error Resume Next
Application.ScreenUpdating = False
Application.DisplayAlerts = False
For Each Ws In Application.Worksheets
    If Application.WorksheetFunction.CountA(Ws.UsedRange) = 0 Then
        Ws.Delete
    End If
Next
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub

3. 그런 다음 F5 키를 누르면 모든 빈 워크시트가 한 번에 삭제됩니다.

Kutools for Excel로 모든 빈 워크시트 삭제하기

VBA 코드에 익숙하지 않다면, Kutools for Excel이라는 간단한 도구를 소개해 드리겠습니다. 이 도구의 빈 워크시트 삭제 기능을 사용하면 한 번의 클릭으로 모든 빈 워크시트를 삭제할 수 있습니다.

Kutools for Excel에는 300개 이상의 유용한 Excel 도구가 포함되어 있습니다. 30일 동안 제한 없이 무료로 사용해 볼 수 있습니다. 지금 바로 다운로드하세요.

Kutools for Excel을 설치했다면, 다음 단계를 따라주세요:

1. Kutools Plus > 워크시트 > 빈 워크시트 삭제를 클릭합니다. 스크린샷 보기:

2. 그리고 모든 빈 워크시트를 삭제할지 여부를 묻는 메시지 상자가 나타납니다. 스크린샷 보기:

3. 예를 클릭하면 빈 워크시트가 성공적으로 삭제됩니다. 스크린샷 보기:

이 기능에 대해 더 알고 싶으시다면, 빈 워크시트 삭제를 클릭하세요.

관련 기사:

Excel에서 숨겨진 워크시트를 삭제하려면 어떻게 해야 하나요?