Visible sous VBA
adrienDN11
Messages postés
467
Date d'inscription
Statut
Membre
Dernière intervention
-
Zoul67 -
Zoul67 -
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
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
A voir également:
- Visible sous VBA
- Clé usb non visible - Guide
- Compte facebook désactivé mais toujours visible - Guide
- Excel ligne toujours visible - Guide
- Capture d'écran whatsapp visible - Accueil - Messagerie instantanée
- Excel compter cellule couleur sans vba - Guide
2 réponses
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 .:
sinon :
Par ailleurs, si le bouton est invisible la souris ne passera pas dessus et rien ne se déclenchera!
A+
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+
