Capturar pantalla de excel y exportar como imagen

hola, Luis !

... la idea es capturar un rango de celdas y luego exportar la imagen capturada a un directorio en el disco de la Pc.

ejemplo para exportar un grupo de celdas a una imagen con formato GIF o JPG?
suponiendo que deseas copiar el rango [B6:D16] de la hoja activa

en un modulo de codigo 'normal' ==Sub CopiarUnRangoAGIF()
Dim Izq As Single, Arr As Single, Ancho As Single, Alto As Single
Application.DisplayAlerts = False
With Range("b6:d16")
Izq = .Left: Arr = .Top: Ancho = .Width: Alto = .Height: .CopyPicture
End With
With ActiveSheet.ChartObjects.Add(Izq, Arr, Ancho, Alto)
.Chart.Paste
.Chart.Export "c:uta y\sub carpeta para\tu archivo.gif"
.Delete
End With
Application.DisplayAlerts = True
End Sub

saludos,
hector.

__ previos __

Como hacer un proceso con programacion er vbapp (Macros) ...

define: "capturar pantalla" (?)
- la pantalla completa ? (hoja, menus, barras de desplazamiento, titulos, etc.)
- solo un rango de datos ?
- que incluya los encabezados de fila y columna ?

(y cualquier otro detalle que tengas "en el tintero")