Macro excel sur clic

Résolu
clé de 12 Messages postés 141 Date d'inscription   Statut Membre Dernière intervention   -  
clé de 12 Messages postés 141 Date d'inscription   Statut Membre Dernière intervention   - 16 janv. 2024 à 22:40

Bonjour,

Problème simpliste que j'ai résolu en son temps... Comment rendre une image non visible sur le clic de cette image. En gros je voudrais faire un truc qui marche comme ça :

Sub Picture2_Clic()
this(Picture2).Visible = False
End Sub

Je sais que ma syntaxe est pourrie mais je compte sur vous.... car je dois appliquer cette démarche dédiée à 30 autres objets

Cordialement
 


Windows / Edge 120.0.0.0

A voir également:

1 réponse

Réponse 1 / 1
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 

Bonjour

Un petit exemple pour cacher/montrer

https://www.cjoint.com/c/NAqnUmGuVfB

Cdlmnt
0
clé de 12 Messages postés 141 Date d'inscription   Statut Membre Dernière intervention   1
 

Merci beaucoup. J'ai adapté à mes besoins 

Sub Picture2_Clic()
    ActiveSheet.Shapes(Picture2).Visible = False
End Sub

Idem pour Picture3, 4 etc... et la RAZ m'a évité beaucoup de recherches....

Bravo

0
clé de 12 Messages postés 141 Date d'inscription   Statut Membre Dernière intervention   1
 

bonjour ccm81,

j'ai clos un peu vite ma question. J'ai ecris 

Sub Picture2_Clic()
    ActiveSheet.Shapes(Picture2).Visible = False
End Sub

Sub Picture3_Clic()
    ActiveSheet.Shapes(Picture3).Visible = False
   
End Sub
Sub Picture4_Clic()
    ActiveSheet.Shapes(Picture4).Visible = False
End Sub

Si le 1er sub fonctionne, les autres non. Est ce normal ou je fais une toile? Merci

0
clé de 12 Messages postés 141 Date d'inscription   Statut Membre Dernière intervention   1 > clé de 12 Messages postés 141 Date d'inscription   Statut Membre Dernière intervention  
 

OK j'ai fait une toile sur les apostrophes ;o) La bonne syntaxe étant 

Sub Picture6_Clic()
    ActiveSheet.Shapes("Picture 6").Visible = False
End Sub

0

Discussions similaires

Transformer un chiffre en lettres dans excel sans macro
vincentphilippos -
tontong -

6 réponses