Insertar imagen segun valor en una celda
alb...@gmail.com
Necesitaría que alguien que se preste, me echara una mano, no se si lo
que pretendo es posible efectuar de alguna manera.
Trato de en una celda, en la cual hay 6 valores posibles, insertar una
imagen en función del valor de la celda anterior.
Me es bastante dificil explicar , sin poder insertar la hoja de
calculo con la que estoy trabajando.
Más o menos lo que quiero, podría ser similar al siguiente caso,
tenemos en una celda la posibilidad de poner 6 alimentos distintos, lo
que trato es asociar la imagen de cada alimento en otra celda.
Gracias.
Abraham
http://foros.emagister.com/tema-insertar_imagen_segun_valor_en_una_celd-12890-549001-1.htm
Abraham
Ivan
> Trato de en una celda, en la cual hay 6 valores posibles, insertar una
> imagen en función del valor de la celda anterior.
> Más o menos lo que quiero, podría ser similar al siguiente caso,
> tenemos en una celda la posibilidad de poner 6 alimentos distintos, lo
> que trato es asociar la imagen de cada alimento en otra celda.
.
no estoy seguro de si esto te ayudara, pero al menos puede darte una
idea para aclarar un poco la consulta:
si quieres prueba este ej.:
en un libro nuevo (por si las moscas) inserta en la hoja 1 (pej)
varias imagenes. Si quieres adaptalas/colocalas en las celdas que
quieras. (menos en A1 (esta celda dejala visible)
haz boton secundario en la pestaña de la hoja (nombre) => elije ver
codigo => en la ventana blanca que se te habra abierto copia/ pega el
siguiente codigo =>
'--------------copia / pega desde aqui ---------------
Private Sub Worksheet_Change(ByVal Target As Range)
Dim n As Byte
With Me
If Not Intersect(Target, .[a1]) Is Nothing Then
For n = 1 To .Shapes.Count
.Shapes(n).Visible = False
Next
On Error Resume Next
.Shapes(.Range("a1")).Visible = True
End If
End With
End Sub
'------------------- hasta aqui ------------------------
ahora vuelve a la hoja y escribe en A1 un nº igual o menor que el nº
de fotos que hayas insertado (o el nombre de la foto si lo conoces
<aunque esto ultimo no estoy seguro de si 1º deberias definir un
nombre para cada foto o te valen las del archivo> y dale a intro para
salir de esa celda
mira a ver si puede ir en el sentido de lo que buscas y si es asi si
quieres amplias los detalles (rangos, donde estan las imagenes 8o
donde quieres que esten, etc)
espero te ayude
un saludo
Ivan
PD: seguro que alguien puede ampliar la informacion sobre los riesgos
de la manipulacion de imagenes y la mejor forma de minimizarlos (yo
soy un desastre y aun no he conseguido que se me quede <comprenderlo
del todo>)