Como pegar como imagen un rango de celdas

Necesitaba pegar un rango de celdas sobre una hoja cuyo ancho de columnas no encajaban con la información que tenía la primera tabla. Para ello, había que aplicar una macro para pegar un rango de celdas como imagen.

Seleccionar rango de celdas

La forma de seleccionar un rango de celdas es totalmente indiferente para el objetivo final que planteamos, así que dejo este ejemplo mismo.

    Range("E2").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy

Pegar como imagen 

Una vez seleccionado el rango y copiado, deberemos situarnos en cualquier celda y añadir este código para pegar el rango de celdas como imagen.

Worksheets(cabecera).Activate
Range("B2").Select
ActiveSheet.Pictures.Paste.Select

Pese a haberlo pegado en la celda B2, no se habrá incrustado, sino que se podrá mover más tarde.

Borrar la imagen pegada con una macro

Si lo que queremos es lo contrario, es decir, borrar todas las imágenes de un archivo excel con una macro, quizá deberíamos saber cómo hacer una macro para borrar imágenes.