Masquer une image dans une feuil

Re : Masquer une image dans une feuil

Bonsoir,

Voici le code pour afficher ou masquer votre image :

Astuce pour être sur que votre image porte bien le nom Image1 (utiliser l'enregistreur de macro vba) et cliquer sur l'image (le non du de l'image sera à l'endroit de mes étoiles)

ActiveSheet.Shapes("********") ====>>> dans le code crée par VBA

si c'est bien Image1 laisser comme cela est sinon changer par le nom par celuis qui est à la place des étoiles

' =====================================================

Sub Masquer()

ActiveSheet.Shapes("Image1").Visible = False
End Sub

' =====================================================

Sub Aficher()

ActiveSheet.Shapes("Image1").Visible = True
End Sub

Laurent

Re : Masquer une image dans une feuil

Bonjour laurent et merci por ta solution celui ci fonctionne tres bien

mais peut tu m'eclaire sur une chose je voudrais au lieu du click utiliser la fontion movemouse qui sert dans je rentre la sourie sur l'image elle s'agrandie quand je la retire elle redeviens sa taille normal.
j'ai réussis pour quand la sourie entre dans l'image mais pas quand elle sort

pourais tu me dire comment ont fais merci d'avance à bientot

Re : Masquer une image dans une feuil

Bonsoir SSIAP2,

Peux-tu m'envoyer ton fichier avec le code, je vais regarder cela :

Je te renvois cela avec la correction est le commentaire associer au code.

Laurent