Asociar imagen a una celda en una condición macro

Hola eslait,

En lo personal no soy nada partidario de usar imagenes en Excel, pero ya que lo preguntas...

Suponiendo que en todo caso para que tu macro funcione tendras que adjuntar las imagenes al archivo de alguna manera...

Podrias evitar el uso de los macros. Prueba hacer lo siguiente:

1) Elige las primeras 4 filas y ajusta su altura de tal manera que sea igual o ligeramente superior a la altura de las imagenes (asegurate de que las imagenes sean de iguales dimensiones)
2) Ahora ajusta el ancho de la columna [B] de tal manera que sea igual o ligeramente superior al ancho de las imagenes.
3) Introduce todas las imagenes encajandolas exactamente dentro de las celdas [B1], [B2], [B3], [B4] respectivamente.
4) Ahora en el rango [A1:A4] introduce los nombres unicos correspondientes a cada una de las imagenes.
5) Ve al menu Insertar>Nombre>Definir... y crea un nuevo nombre con los siguientes parametros:
nombre: IMAGEN
se refiere a: =INDICE(Sheet1!$B$1:$B$4;COINCIDIR(Sheet1!$E$6;Sheet1!$A$1:$A$4;0))
6) Selecciona la celda [E6], ve al menu Datos>Validacion... y en la primera pestana introduce los siguienetes parametros:
permitir: Lista
fuente: =$A$1:$A$4
ahora podras eligir los nombres de una lista desplegable de la celda [E6].
7) Copia una de las imagenes
8) Selecciona la nueva imagen y en la barra de formulas escribe la siguiente formula y pulsa Enter:
=IMAGEN
9) Prueba seleccionar alguna opcion en el desplegable de la celda [E6]

Aqui te pongo un ejemplo: http://www.telefonica.net/web/kl/SS...lImage.xls

Saludos,
KL



"eslait" wrote in message news:

Hola,

quería saber si es posible poner una condición en macro tipo " if
cells(1,1).value=1 then " para cumplir la condición en otra celda de tal
manera que el resultado sea una imagen " then... cells(1,2).value= Y EN ESTA
CELDA PONDRÍAMOS LA IMAGEN".

Esto lo quiero hacer para un pequeño proyecto con cartas y para hacerlo más
visual. Si asocio un código a cada carta de la baraja española:

a1=as de oros
a2= dos de oros
a3= tres de oros
..
.

quiero que cuando se cumpla la condición en la que cierta casilla tenga el
valor "a1" me aparezca la imagen de la carta ocupando exactamente la celda
asignada.

gracias antipadas y un saludo

eslait