Esto lo podemos hacer con una macro relativamente sencilla:
Sub Imagen()
estado = ActiveSheet.Shapes(1). Visible
ActiveSheet.Shapes(1).Visible = Not estado
End Sub
Esta macro toma nota del valor de la propiedad Visible de la imagen. Este valor puede ser True (verdadero) si está visible o False (falso) si no lo está.
Una vez conocido el valor de dicha propiedad, la macro le asigna el valor contrario. Es decir, True si era False, y viceversa.
El operador Not, aplicado a una variable lógica, devuelve el valor contrario. Se podría llegar a considerar algo así como cambiarle el signo a una variable numérica.
Esto no es exactamente lo mismo que marcar una casilla de verificación, pero, si asignamos la macro a un botón, podemos obtener un resultado equivalente.
El argumento de Shapes es el número de orden en el que la imagen fue insertada en el documento, o su nombre, escrito entre comillas. Este nombre, es el mismo que aparecerá en el cuadro de nombres cuando tengamos seleccionada la imagen.
