Visible sous VBA

Question

Bonjour, 

Je suis actuellement en train de réaliser un classeur sous excel.

Je désirerais changer la propriété visible d'un bouton lorsque je passe ma souris dessus.

J'ai déjà écrit ça :

Private Sub CommandButton2_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

With Me.CommandButton2
                
                Visible = True
                
                    End With

End Sub



Mais l'ennui, c'est que ça n'a pas l'air de fonctionner.


Quelqu'un pour m'aider ?

Merci


Configuration: Windows Vista / Safari 534.10

Paf · Answer

bonsoir 

pour déclencher l'action au passage de la souris, utilise MouseMove au lieu de MouseDown 

si tu tiens a utilise with, n'oublie pas le .: 

With Me.CommandButton2 
.Visible = True 
End With 

sinon : 
Private Sub CommandButton2_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) 
CommandButton2.Visible = True 
End Sub

Par ailleurs, si le bouton est invisible la souris ne passera pas dessus et rien ne se déclenchera! 

A+

adrienDN11 · Answer

Aie, donc comment faire pour que quand on passe dessus sous invisible, il se rendre visible ?

Merci.

Visible sous VBA

2 réponses

Discussions similaires

Newsletters