OVH Cloud OVH Cloud

[VBA] [XL97] Incroyable .... mais vrai !

1 réponse
Avatar
Orel
bonjour à tous !

j'ai dans mon classeur une feuil1 avec dessus deux fonctions :
=INCORPORER("Forms.Image.1";"")

qui pointe vers la meme image a savoir un petit V (Valider) de couleur Vert.

pour test j'ai fais deux bouton :

Private Sub CommandButton2_Click()
VvertFichier.Visible = True
VvertGenerer.Visible = True
End Sub

Private Sub CommandButton3_Click()
VvertFichier.Visible = False
VvertGenerer.Visible = False
End Sub

le premier pour afficher mes petits "V"
le second pour les masquer...

mais seul VvertFichier s'affiche et se cache correctement .... VvertGenerer
reste toujurs visible...

d'ou cela peu t il donc pouvoir venir !

MERKI !!!

orel

1 réponse

Avatar
Michel Gaboly
Bonjour,

As-tu vérifié que ce n'est pas un problème d'accent :

il suffit que le bon nom soit "VvertGénérer" pour que la macro n'ait pas
d'effet sur l'image.

Lance cette procédure et vérifie les noms des objets (fenêtre exécution,
raccourci clavier Cmd + G sur Mac, Ctrl + G surPC)

Sub TrouveNoms()
Dim s As Shape
For Each s In ActiveSheet.Shapes
Debug.Print s.Name
Next s
End Sub




bonjour à tous !

j'ai dans mon classeur une feuil1 avec dessus deux fonctions :
=INCORPORER("Forms.Image.1";"")

qui pointe vers la meme image a savoir un petit V (Valider) de couleur Vert.

pour test j'ai fais deux bouton :

Private Sub CommandButton2_Click()
VvertFichier.Visible = True
VvertGenerer.Visible = True
End Sub

Private Sub CommandButton3_Click()
VvertFichier.Visible = False
VvertGenerer.Visible = False
End Sub

le premier pour afficher mes petits "V"
le second pour les masquer...

mais seul VvertFichier s'affiche et se cache correctement .... VvertGenerer
reste toujurs visible...

d'ou cela peu t il donc pouvoir venir !

MERKI !!!

orel


--
Cordialement,

Michel Gaboly
http://www.gaboly.com