Ocultar imágenes
Hola buenas, quería saber, si alguien lo sabe, como ocultar imágenes en Excel y mostrarlas al cambiar el valor de una celda. Muchas Gracias
1 respuesta
Respuesta de Elsa Matilde
1
En primer lugar selecciona la imagen que tienes insertada en la hoja y fíjate el nombre (con clic derecho opción Asignar macro lo verás)
Luego en el Editor de macros, en la hoja donde quieras que te aparezca la imagen copia esta rutina, que examina el valor de la celda A2 (ajustá esta referencia a tu necesidad)
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
'se controla el cambio en la celda A2
If Target.Address = "$A$2" Then
If Target.Value = "X" Then
'AJUSTAR EL NOMBRE DE LA IMAGEN
ActiveSheet.Shapes("Imagen 1").Visible = True
Else
ActiveSheet.Shapes("Imagen 1").Visible = False
End If
End If
End Sub
Luego en el Editor de macros, en la hoja donde quieras que te aparezca la imagen copia esta rutina, que examina el valor de la celda A2 (ajustá esta referencia a tu necesidad)
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
'se controla el cambio en la celda A2
If Target.Address = "$A$2" Then
If Target.Value = "X" Then
'AJUSTAR EL NOMBRE DE LA IMAGEN
ActiveSheet.Shapes("Imagen 1").Visible = True
Else
ActiveSheet.Shapes("Imagen 1").Visible = False
End If
End If
End Sub
