graficos gif

Hola Alberto corrales.

creo que si se puede, mira estando en una hoja nueva de Excel dale ha la pestaña de la hoja
donde dice Hoja1 un clic con el botón izq. y selecciona la opción Ver código, y pega el
siguiente, no recuerdo bien quien me lo dio pero esta muy bueno te lo paso por si te ayuda en
algo, bueno pégalo

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.Address = "$A$5" Then Exit Sub
Dim De_donde As String, Foto As Object, _
Arriba As Double, Izquierda As Double, Ancho As Double, Alto As Double
Application.ScreenUpdating = False
On Error Resume Next
Me.Shapes("La_Foto").Delete
De_donde = "C:\imagenes\" & [a5] & ".gif" 'Aquí va la ruta donde están las imágenes
If Dir(De_donde) = "" Then Exit Sub
Set Foto = Me.Pictures.Insert(De_donde)
With Me.Range("f5:k24")
Arriba = .Top
Izquierda = .Left
Ancho = .Offset(0, .Columns.Count).Left - .Left
Alto = .Offset(.Rows.Count, 0).Top - .Top
End With
With Foto
.Name = "La_Foto"
.Top = Arriba
.Left = Izquierda
.Width = Ancho
.Height = Alto
End With
Set Foto = Nothing
End Sub

si no mal recuerdo fue el buen amigo Hector Miguel, bien debes de tener tus archivos en un
directorio o carpeta llamada Imagenes si ves el código en la linea "8" ahi le puede combiar de
gif a jpg, pero son imagenes fijas, una vez hecho esto cierra la ventana donde pusiste el
código y en la celda "A5" escribe el nombre"solo el nombre" y veras la imagen.
Un saludo,
Daniel.