¿Cómo eliminar todas las imágenes en un rango de celdas?

Si hay varias imágenes insertadas en tu hoja de cálculo y deseas eliminar algunas de ellas en un rango específico, ¿cómo lo manejas rápidamente?

Eliminar todas las imágenes en un rango específico de celdas con código VBA

Eliminar todas las imágenes en una hoja de cálculo o libro completo con Kutools para Excel

Eliminar todas las imágenes en un rango específico de celdas con código VBA

Aquí tienes un sencillo código VBA que te ayudará a eliminar las imágenes en el rango seleccionado sin tener que borrarlas una por una. Por favor, sigue estos pasos:

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

2. Haz clic en Insertar > Módulo, y pega el siguiente código en la ventana del Módulo.

Código VBA: eliminar todas las imágenes en un rango de celdas seleccionado:

Sub DeletePic()
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("A5:B8")
    For Each xPic In ActiveSheet.Pictures
        Set xPicRg = Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)
        If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete
    Next
    Application.ScreenUpdating = True
End Sub

Nota: En el código anterior, A5:B8 es el rango del que deseas eliminar las imágenes; cámbialo según sea necesario.

3. Luego, presiona la tecla F5 para ejecutar este código, y las imágenes en el rango seleccionado se eliminarán de inmediato, como se muestra en la captura de pantalla:

Eliminar todas las imágenes en una hoja de cálculo o libro completo con Kutools para Excel

Si necesitas eliminar todas las imágenes de una hoja de cálculo o un libro, la utilidad Eliminar Ilustraciones y Objetos de Kutools para Excel puede ayudarte.

Después de instalar Kutools para Excel, por favor, sigue los siguientes pasos:

1. Haz clic en Kutools > Eliminar > Eliminar Ilustraciones y Objetos, ver captura de pantalla:

2. En el cuadro de diálogo Eliminar Ilustraciones y Objetos, marca Imágenes en la sección Eliminar, y luego selecciona el ámbito del que deseas eliminar las imágenes en la sección Buscar en, ver captura de pantalla:

3. Luego haz clic en el botón Aceptar, y todas las imágenes serán eliminadas de la hoja de cálculo o del libro completo según lo seleccionado.