¿Cómo eliminar una hoja específica si existe en el libro de trabajo?

¿Cómo podría eliminar una hoja de cálculo específica si existe dentro de un libro de trabajo? Normalmente, tendría que buscar y verificar si existe, y luego eliminarla manualmente. Aquí, hablaré sobre una manera fácil de eliminar directamente la hoja de cálculo especificada si existe en el archivo de Excel.

Eliminar una hoja de cálculo específica si existe en un libro con código VBA

Eliminar una hoja de cálculo específica si existe en un libro con código VBA

El siguiente código VBA puede ayudarle a eliminar la hoja de cálculo especificada si existe en el libro, por favor haga lo siguiente:

1. Mantenga presionadas las teclas ALT + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. Haga clic en Insertar > Módulo, y pegue el siguiente código en la Ventana del Módulo.

Código VBA: Eliminar una hoja de cálculo específica si existe en el libro

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. Luego presione la tecla F5 para ejecutar este código, aparecerá un cuadro de diálogo que le recordará que escriba el nombre de la hoja que desea verificar si existe, vea la captura de pantalla:

4. Y luego haga clic en el botón Aceptar:

(1.) Si la hoja existe, se eliminará de inmediato, vea la captura de pantalla:

(2.) Si la hoja no existe, aparecerá un cuadro de diálogo para recordárselo como se muestra en la siguiente captura de pantalla:

Descubre la Magia de Excel con Kutools AI

• Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
• Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
• Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
• Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
• Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.

Potencia tus capacidades de Excel con herramientas impulsadas por IA. ¡Descarga Ahora y experimenta una eficiencia como nunca antes!