macro para mostrar diferentes fotos en la misma hoja

01/01/2004 - 23:10 por alejandro | Informe spam
Hola...
Bueno, la idea es la siguiente.
Tengo una hoja en la que he puesto una lista de alumnos y
un muchas columnas para anotar la asistencia y más cosas.

Yo quiero que cada vez que seleccione el nombre o
cualquier celda de la misma fila, me aparezca en un sitio
concreto de la hoja, una foto del alumno en cuestión.
Obviamente cada vez que seleccione cualquier otro alumno,
me lo muestre en el mismo sitio.

No sé si es posible pero por preguntar, nada se pierde.

Feliz año a todos!!

alejandro
 

Leer las respuestas

#1 Zapata
02/01/2004 - 10:43 | Informe spam
Hola Alejandro:
lo que pides lo tienes que hacer con VBA.esta macro que pongo a continuacion
la tienes que colocar en el evento Worksheet_Change de la hoja afectada. si
tienes dudas me lo haces saber.
Un saludo..
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'SUPUESTOS
'No tienes mas imagenes en la hoja
'El nombre del alumno es el nombre de su foto
'la columna que contiene el nombre del alumno es la primera
'El formato de las fotos es jpg
Application.EnableEvents = False
NombreAlumno = Target.End(xlToLeft).Value
Range("A1").Select
ActiveSheet.Pictures.Delete
ActiveSheet.Pictures.Insert ("C:\Mis documentos\Mis imágenes\" &
NombreAlumno & ".jpg")
Application.EnableEvents = True

End Sub

Preguntas similares