워크북에 특정 시트가 있는 경우 어떻게 삭제합니까?

워크북 내에 특정 워크시트가 존재할 경우 이를 삭제하려면 어떻게 해야 할까요? 일반적으로 해당 시트가 존재하는지 확인한 후 수동으로 삭제해야 합니다. 여기에서는 Excel 파일에 특정 워크시트가 존재할 경우 이를 직접 삭제할 수 있는 쉬운 방법에 대해 설명하겠습니다.

VBA 코드를 사용하여 워크북에 있는 특정 워크시트 삭제하기

VBA 코드를 사용하여 워크북에 있는 특정 워크시트 삭제하기

다음 VBA 코드는 워크북에 특정 워크시트가 존재할 경우 이를 삭제하는 데 도움이 됩니다. 아래 단계를 따라 진행하세요:

1. ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

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

VBA 코드: 워크북에 특정 워크시트가 존재할 경우 삭제하기

Sub Test()
'Updateby Extendoffice
    Dim xWs As Worksheet
    Dim sheetName As String
    sheetName = Application.InputBox("Input Sheet Name:", "Kutools for Excel", _
                                    "sheet1", , , , , 2)
    Application.DisplayAlerts = False
    Err.Clear
    On Error Resume Next
    Set xWs = Sheets(sheetName)
    If Err <> 0 Then
        MsgBox "The'" & sheetName & "'" & "does not exist!", vbInformation, "Kutools for Excel"
        Exit Sub
    Else
        xWs.Delete
        MsgBox "The'" & sheetName & "'" & "has been deleted!", vbInformation, "Kutools for Excel"
    End If
    Application.DisplayAlerts = True
End Sub

3. 그런 다음 이 코드를 실행하기 위해 F5 키를 누르세요. 그러면 존재 여부를 확인하려는 시트 이름을 입력하라는 메시지 상자가 표시됩니다. 스크린샷 참고:

4. 그리고 확인 버튼을 클릭합니다:

(1.) 만약 시트가 존재한다면, 즉시 삭제됩니다. 스크린샷 참고:

(2.) 만약 시트가 존재하지 않는다면, 다음과 같은 메시지 상자가 나타나서 알려줍니다. 스크린샷 참고:

Kutools AI로 엑셀의 마법을 풀다

• 스마트 실행: 셀 작업 수행, 데이터 분석 및 차트 생성 - 간단한 명령어로 모든 것을 처리합니다.
• 사용자 정의 수식: 작업을 간소화하기 위한 맞춤형 수식을 생성합니다.
• VBA 코딩: 손쉽게 VBA 코드를 작성하고 실행합니다.
• 수식 해석: 복잡한 수식도 쉽게 이해할 수 있습니다.
• 텍스트 번역: 스프레드시트 내 언어 장벽을 허물어 보세요.

AI 기반 도구로 엑셀 활용 능력을 강화하세요. 지금 다운로드하여 그 어느 때보다 높은 효율성을 경험해 보세요!